Задание 4 Составить алгоритм вычисления площади окружности, если
известен ее
диаметр. в программе паскаль авс
Ответы
Ответ дал:
1
var
d,r,s :real;
begin
write('Ведите значение диаметра и нажмите ввод');
readln(d);
r:=d/2;
s:= Sqr(r)*Pi;
write('Площадь круга с D= '+d+' роровна S= '+s+' ед^2');
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад