Паскаль.Найдите Sкруга и длину окружности. Числа не даны.Там начало :

Паскаль.

Найдите Sкруга и длину окружности. Числа не даны.

Там начало : Program:zadacha333;

Var..

Задать свой вопрос
1 ответ

var S,R,c: real;

begin

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

readln(R);

S:=Pi*sqr(R);

c:=2*Pi*R;

writeln('S = ',S);

writeln('c = ',c);

end.

Олежка Фисюк
Громадное спасибоо)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт