
Решите часть 3 плз( Паскаль)

Var a, i, anew: integer;
begin
read (a);
for i:=1 to 2 do begin
read (anew);
if a
writeln (a);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var a, i, anew: integer;
begin
read (a);
for i:=1 to 2 do begin
read (anew);
if a
writeln (a);
end.