Предмет: Информатика,
автор: AnastasiaAndreevna
ПОМОГИТЕ,ПОЖАЛУЙСТА!!!Как найти периметр квадрата в Паскале,если дана его площадь .Заранее спасибо.
Ответы
Автор ответа:
0
var
a,p,s:real;
begin
Write('Введите площадь квадрата: ');
Readln(s);
a:=sqrt(s);
p:=4*a;
Writeln('Периметр квадрата равен ',p)
end.
Тестовое решение:
Введите площадь квадрата: 13.7
Периметр квадрата равен 14.8054044186574
a,p,s:real;
begin
Write('Введите площадь квадрата: ');
Readln(s);
a:=sqrt(s);
p:=4*a;
Writeln('Периметр квадрата равен ',p)
end.
Тестовое решение:
Введите площадь квадрата: 13.7
Периметр квадрата равен 14.8054044186574
Похожие вопросы
Предмет: Литература,
автор: andreytsurkov
Предмет: Русский язык,
автор: najmadinovajanat
Предмет: Физкультура и спорт,
автор: Аноним
Предмет: Литература,
автор: vikaviktoria1