Напишите программку, которая в последовательности естественных чисел определяет малое
Напишите программку, которая в последовательности натуральных чисел определяет минимальное число, заканчивающееся на 14. Про- грамма получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчи- вающееся на 14. Количество чисел не превосходит 1000. Введенные числа не превышают 30 000.
Задать свой вопрос
program raf105;
var min,n,a,i:integer;
begin
write('Введите количество чисел: ');
readln(n);
writeln('Вводите числа по очереди');
min:= 30001;
for i:=1 to n do
begin
readln(a);
if ((a mod 100)=14) and (alt;min)
then min:=a;
end;
writeln('Вывод: ',min);
end.
Язык PascalABC
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.