Пожалуйста, помогите! Напишите программный код с подмогою Pascal. Задан радиус окружности.

Пожалуйста, помогите! Напишите программный код с помощью Pascal. Задан радиус окружности. Найдите площадь и длину
C=2Пr (П=3.14) - длина окружности
S=Пr^2 - площадь

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

var r:real;

begin

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

read(r);

writeln ('Площадь круга одинакова: ', 3.14*sqr(r):0:3);

writeln ('Длина окружности одинакова: ', 2*3.14*r:0:3);

end.

Dimka Podchelimov
В какую? Полное заглавие? У меня в PascalABC.NET всё отлично, что видно по снимку экрана?
Алмашина Виолетта
Видимо у неё другая версия Паскаль
Аделя Дропаш
Так я и спрашиваю - какая?
Жека Мероньо
Не знаю, я же не она )
Лондиков Степан
Так я не тебя и спрашиваю... )))
Клапкова Арина
у меня тоже PascalABC.NET
Юлия Зубченкова
о! Все вышло!!! Спасибо ОГРОМНОЕ!!!!
Стефания Шелдяева
Что изменила?
Пашка Шуйфер
У меня просто поначалу название программки стояло, а потом я его убрала и все))) Я просто посещаю тупой :)
Александр Куксгаузен
Заглавие программки можно было просто дописать: program Krug;
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт