найдите наибольший из двух квадратов чисел A и B и выведите на печать N=1,если А²>B² и N=2,если наобарот.(Паскаль)

vara, b, n: integer;beginread(a, b);if sqr(a)>sqr(b) then n:=1 else n:= 2; writeln('N = ', n);end.