Напишите программу, которая в последовательности натуральных чисел определяет количество...

0 голосов
33 просмотров

Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 5, а также наибольшее из этих чисел. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 3. Программа должна вывести 2 числа - количество чисел, оканчивающихся на 5 и наибольшее из них. На Паскале


Информатика (14 баллов) | 33 просмотров
Дан 1 ответ
0 голосов

var

a,b,min,i:integer;

begin

read(a);

min:=0;

for i:=1 to (a-2)

do

begin

read(b);

if (b mod 10=6) and ((b

then

min:=b;

read(b);

end;

write(min);

end.

(654k баллов)
0

а причем тут минимальное?