Составить программу: даны два числа a и b; если a> b, то вывести на экран квадрат числа a; в противном случае вывести на экран квадрат числа b.

Var a, b:integer;beginwriteln('Число a: ');readln(a);writeln('Число b: ');readln(b);
if a > b thenwriteln(sqr(a))elsewriteln(sqr(b));end.