Напишите программу, которая в последовательности натуральных чисел, оканчивается на 2. программа получает на выходе количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется числа, оканчивающиеся на 2 количество чисел не превышает 1000. введённые числа не превышают 30 000 программа должна ввести одно числа - максимальное число, оканчивающиеся на 2

agapovaa2002 agapovaa2002    1   29.05.2019 01:00    0

Ответы
maksgrant86 maksgrant86  26.06.2020 21:10
Var
n,i,max,num:integer;
begin
readln(n);

for i:=1 to n do begin 
  readln(num); 
  if (num mod 10=2) and (num > max)
    then max:=num;
end;
writeln(max);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика