Дана площадь квадрата. Составьте программу для его сторон и периметра.

Question

Информатика

Глебыч

11 марта, 04:34

Дана площадь квадрата. Составьте программу для его сторон и периметра.

+1

Ответы (1)

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

Игоша · Answer 1

Program patrart;

var a, p, l:real;

begin

write ('плошадь=') ;

readln (a) ;

l:=sqrt (a) ;

p:=l*4;

writeln ('сторона=', l) ;

writeln ('периметр=', p) ;

end.