Составить алгоритм и программу нахождения периметра квадрата по введённому значению его площади

Question

Павлюня

21 сентября, 18:31

+2

Ответы (2)

Знаете ответ на вопрос?

Адель · Answer 1

Program asd; var a, p:real; begin writeln ('Введите сторону квадрта') ; readln (a) ; p:=4*a; writeln ('p = ', p:10) ; readln (p) ; end.

Ионична · Answer 2

Var

s: real;

a: integer;

begin

readln (a) ;

s : = 4*sqrt (a) ;

writeln (s) ;

end.