Дано 10 целых чисел. Определить, сколько из них меньше заданного числа В.
Нужно полное решение не получается
2 комментария:
а можно больше об условии? нужно написать программу? целые числа вводят пользователи или они вводятся случайным образом? И число B, как я понимаю, вводит пользователь? Спасибо.
а можно больше об условии? нужно написать программу? целые числа вводят пользователи или они вводятся случайным образом? И число B, как я понимаю, вводит пользователь? Спасибо.
а можно больше об условии? нужно написать программу? целые числа вводят пользователи или они вводятся случайным образом? И число B, как я понимаю, вводит пользователь? Спасибо.
а можно больше об условии? нужно написать программу? целые числа вводят пользователи или они вводятся случайным образом? И число B, как я понимаю, вводит пользователь? Спасибо. Ответы
Гость Язык программирования: PascalABC.NET
program number1;
var
B, a : longint;
k : byte;
begin
readln(B);
k := 0;
for i : byte := 1 to 10 do
begin
readln(a);
if a < B then k := k + 1;
end;
writeln(k);
end.
Нет комментариев
Похожие вопросы
Список предметов
