Вопрос по информатике:
Выводится на экран последовательность 20 случайных чисел из промежутка [-10,10]. Определить количество отрицательных чисел больших -5 в данной последовательности.
- 01.03.2017 04:56
- Информатика
- remove_red_eye 4148
- thumb_up 7
Ответы и объяснения 1
Uses crt;
vara:array[1..20]of integer;
i,k:integer;
begin
for i:=1 to 20 do
a[i]:=random (20)-10;
for i:=1 to 20 do
write(a[i],' ')
;for i:=1 to 20 do begin
if (a[i]-5)then
k:=k+1;
end;
writeln;
writeln('кол-во отрицательных чисел больше -5=',k)
end.
- 02.03.2017 03:40
- thumb_up 19
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.