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

Question

Петуся

27 июня, 20:54

+5

Ответы (2)

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

Людмила · Answer 1

Var

s: real;

a: integer;

begin

readln (a) ;

s : = 4*sqrt (a) ;

writeln (s) ;

end.

Паллада · Answer 2

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