Ответы
Ответ дал:
0
Ответ:
Объяснение:
var n,i,a,max: integer;
begin
readln(n);
max := -1;
for i := 1 to n do
begin
readln(a);
if (a mod 10 = 3) and (a > max)
then max := a;
end;
writeln(max);
end.
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад
1 год назад