Дана сторона квадрата a. Найти его площадь S = a2. Входные данные: ввести одно целое...

0 голосов
108 просмотров

Дана сторона квадрата a. Найти его площадь S = a2.
Входные данные: ввести одно целое число а (1<=a<=100).<br>Выходные данные: вывести одно число - площадь квадрата.
помогите решить задачу хотя бы блоком схемой,с условием if и for.учитель зверь!!


Информатика (48 баллов) | 108 просмотров
Дан 1 ответ
0 голосов

uses crt;
var a,s:integer;
begin
writeln(' Write side of the square: ');
readln(a);
if ((a>=1) and (a<=100)) then<br>s:=sqr(a);
writeln(s);
end.

(1.6k баллов)