Требуется написать программу на языке Паскаль или Бейсик, которая будет выводить на экран количество чисел меньше 15 из 30 вводимых с клавиатуры чисел.
Ответы
Ответ дал:
0
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
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад