|
Главная | Правила | Регистрация | Дневники | Справка | Пользователи | Календарь | Поиск | Сообщения за день | Все разделы прочитаны |
|
Опции темы | Опции просмотра |
30.03.2011, 14:37 | #1 (permalink) |
Новичок
Регистрация: 30.03.2011
Сообщений: 8
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Помогите пожалуйста. Через два дня судный день!
1. Дан одномерный массив X. Вывести номера элементов, удовлетворяющих условию 0 < Хi < 1. 2. Найти сумму элементов первого столбца. 3. Определить количество символов в предложении. За ранее кланяюсь в ноги. |
30.03.2011, 14:37 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
В похожих топиках вы наверняка сможете найти решение проблемы Помогите пожалуйста Помогите срочно пожалуйста. Помогите пожалуйста |
30.03.2011, 15:13 | #5 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
30.03.2011, 15:15 | #6 (permalink) | |
Студент БГПУ
Регистрация: 06.02.2010
Сообщений: 420
Записей в дневнике: 3
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 470
|
А язык программирования какой?
Если паскаль то: Цитата:
Код:
var x:array [1..10] of real; i:integer; begin for i:=1 to 10 do begin x[i]:=random(15)/10; if (x[i]>0) and (x[i]<1) then write (i:3); end; readln end. Код:
var a:array[1..5,1..5] of integer; i,j,s:integer; begin s:=0; for i:=1 to 5 do begin for j:=1 to 5 do begin a[i,j]:=random(10); write (a[i,j]:5); end; writeln; end; for i:=1 to 5 do s:=s+a[1,i]; writeln (s); readln end. Код:
var s:string; k:integer; begin k:=0; writeln ('enter string'); read(s); k:=length(s); writeln ('Количество символов',k); readln end. |
|
30.03.2011, 15:29 | #7 (permalink) | |
Новичок
Регистрация: 30.03.2011
Сообщений: 8
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Цитата:
|
|
30.03.2011, 15:40 | #8 (permalink) |
Экономичный вид памяти
Регистрация: 19.02.2008
Сообщений: 2,632
Записей в дневнике: 1
Сказал(а) спасибо: 6
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 2794
|
если нужен столбец то позволю поправить код shrek=)
Код:
var a:array[1..5,1..5] of integer; i,j,s:integer; begin s:=0; for i:=1 to 5 do begin for j:=1 to 5 do begin a[i,j]:=random(10); write (a[i,j]:5); end; writeln; end; for i:=1 to 5 do s:=s+a[i,1]; // переставляем счетчик на столбец writeln (s); readln end. |
30.03.2011, 17:23 | #10 (permalink) |
Экономичный вид памяти
Регистрация: 19.02.2008
Сообщений: 2,632
Записей в дневнике: 1
Сказал(а) спасибо: 6
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 2794
|
На будущее так чисто совет от бывалого... То что тебе щас помогли хорошие люди...и пускай даже проскочишь с этими прогами дальше по учебе ...это не значит что так будет всегда...дальше пойдут программы где требуется именно твои навыки кодирования...а они нарабатываются только практикой...копипаст пусть даже ты заучишь код программы никогда не научит тебя думать как необходимо программисту...лучще написать свою пусть глючную, пусть немного не правильно работающею прогу ..но написать..а поправить ошибки люди всегда найдутся...даже преподаватели лучше относится будут если ты будешь сдавать свой самописый код
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Опции темы | |
Опции просмотра | |
|
|