Question

Здравствуйте, можно ли перевести эту программу на Паскале, перевести на Пайтон? Спасибо.

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.

Answer 1

n = int(input())

max = -1

for i in range(1, n+1):

   a = int(input())

   if a % 10 == 3 and a > max:

       max = a

print(max)