Написать программу для решения задачи.

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

Question

Брина

2 августа, 15:56

+5

Ответы (1)

Знаете ответ?

Аксентий · Answer 1

Var a, S:integer;

Begin

Writeln ("Введите сторону квадрата a") ;

Readln (a) ;

S:=sqr (a) ;

Writeln ("Площадь квадрата S=", S) ;

readln;

end.

Написать программу для решения задачи.Дана сторона квадрата a. Найти его площадь S = a2.