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

0 голосов
39 просмотров

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


Информатика (28 баллов) | 39 просмотров
Дан 1 ответ
0 голосов

var r:real;

begin

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

read(r);

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

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

end.


image
(3.9k баллов)
0

В какую? Полное название? У меня в PascalABC.NET всё отлично, что видно по скриншоту?

0

Видимо у неё другая версия Паскаль

0

Так я и спрашиваю - какая?

0

Не знаю, я же не она )

0

Так я не тебя и спрашиваю... )))

0

у меня тоже PascalABC.NET

0

о! Все получилось!!! Спасибо ОГРОМНОЕ!!!!

0

Что изменила?

0

У меня просто сначала название программы стояло, а потом я его убрала и все))) Я просто бываю тупой :)

0

Название программы можно было просто дописать: program Krug;