Вычислить длину окружности и площадь круга,заданного радиуса R.ПАСКАЛЬ

15 Янв 2019 в 10:09
461 +1
0
Ответы
1

var r,c,s: real;

begin

readln(r);

c:=2*pi*r;

s:=pi*r*r;

writeln('C = ',c:4:2,' s = ',s:4:2);

end.

Пример

5

C = 31.42 s = 78.54

25 Окт 2019 в 23:35
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир