Составьте программу вычисления площади квадрата со стороной а

Программа на паскале:
program square;
var a,s:integer;
begin
write('a = ');
readln(a);
s:=a*a;
writeln('s = ',s);
end.

Пример:
a = 5
s = 25