Написать программу, в которой пользователь вводит несколько чисел, программа выводит количество положительных чисел.
Написать программу, в которой пользователь вводит несколько чисел, программа выводит количество положительных чисел.
Ответ(ы) на вопрос:
Гость
uses crt;
const n:=5
var a:array[1..n] of integer;
i: integer;
begin clrscr;randomize;
for i:=1 to n do begin
a[i]:=random(100)-50;
if a[i]>0 then
writeln(a[i]);
end;
readkey;
end.
проверь программу, скорее всего будет так
Не нашли ответ?
Похожие вопросы