Задание 4 Составить алгоритм вычисления площади окружности, если известен ее
диаметр. в программе паскаль авс

Darvin2004 Darvin2004    1   05.02.2021 09:13    4

Ответы
murad2097 murad2097  05.02.2021 09:20

var

 d,r,s :real;

 begin

   write('Ведите значение диаметра и нажмите ввод');

   readln(d);

   r:=d/2;

   s:= Sqr(r)*Pi;

   write('Площадь круга с D= '+d+'  роровна S= '+s+' ед^2');

 end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика