Дана сторона квадрата а. Найти его площадь S=a2. входные данные:ввести одно целое число а (1<=а<=100). выходные данные:вывести одно число-площадь квадрата? ПОМОГИТЁ ПОЖАЛУЙСТА
Program plowad; var a,s:real ;begin readln(a); s:=a*2; writeln(s) end.