Требуется написать программу на языке паскаль или - вопрос №166414 от 2499930 23.10.2021 17:34

Question

Информатика: Требуется написать программу на языке паскаль или бейсик, которая будет выводить на экран количество чисел меньше 15 из 30 вводимых с клавиатуры чисел.

2499930 · Answer

var a: real;

n,i: integer;

begin

n:=0;

for i:=1 to 30 do begin

readln(a);

if a<15 then n:=n+1

end;

writeln(n);

end.

Язык Pascal