Предмет: Информатика, автор: PACANASD

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

Ответы

Автор ответа: sansanic
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

Интересные вопросы
Предмет: Биология, автор: 889miroxa889
Предмет: Английский язык, автор: shahinatojimurodova
Предмет: География, автор: alisher08