Вычислить площадь квадрата со стороны а. "паскаль abc"

Var a: integer;
begin
write('Введите сторону квадрата: ');
readln(a);
writeln('Площадь квадрата равна ',a*a);
end.