Информатика, опубликовано 2018-08-22 21:56:50 by Гость
Выводится на экран последовательность 20 случайных чисел из промежутка [-10,10]. Определить количество отрицательных чисел больших -5 в данной последовательности.
Ответ оставил Гость
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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на