Нахождения площади квадрата при известной что куда поставить?

Задание 2. Практическая работа
создайте программу для нахождения площади квадрата при известной,
2 сторони по 5 см
если идти по
program dz;
var a:real;
begin
write('wwedite stor.kwadr. a ='); read(a);
write(' ploshad kwadr. S = a*a =',a*a);
end.
что нужно на 5ки заменить здесь 1)S = a*a или здесь 2)=',a*a);
я в этом не шарящий попросили помочь
ребенку прислали задание а учитель не об'яснил что и как! мучаются сами