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

Question

Информатика

Олегыч

14 февраля, 00:07

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

+3

Ответы (1)

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

Лада · Answer 1

Program E09;

uses crt;

var

R, S, DL: real;

begin

clrscr;

writeln ('Введите радиус: ') ;

readln (R) ;

S:=pi*sqr (R) ;

DL:=2*pi*R;

writeln ('Площадь: ', S:5:2) ;

writeln ('Длинна окружности: ', DL:5:2)

end.

В общем понял только так ...