Вопрос по информатике:
Помогите,пожалуйста, решить задачу на тему "Одномерные массивы" на языке Pascal.
Сама задача: Найдите количество элементов массива,меньше квадрата своего номера.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.06.2015 16:57
- Информатика
- remove_red_eye 7303
- thumb_up 36
Ответы и объяснения 1
Var b,c,d: integer;
a:array [1..100] of integer;
begin
d:=0;
for c:=1 to 10 do begin
a[c]:=random(50);
if sqr(c)>a[c] then d:=d+1;
writeln(c,'-->',a[c]);
end;
writeln('количество ',d);
end.
- 16.06.2015 11:12
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.