Top.Mail.Ru
Ответы
Аватар пользователя
Аватар пользователя
Аватар пользователя
Аватар пользователя
Наука
+4

Помогите написать программу на Паскале

1. Найти длину окружности 1. задаиного радиуса R. (L=2xR ).
Вход 7
Выход L=43.96

По дате
По рейтингу
Аватар пользователя
Новичок

И в чём вопрос? Паскаль знает число пи, радиус Вы вводите.
Осталось умножить и вывести куда-нибудь результат. Будет как-то так:

{$N+}
program dlina;
var L,R:extended;
begin
write('введите радиус окружности'); read(R); L:=2.0*PI*R;
write('длина окружности равна',L:6:2);
end.

Безумно сложно!
Количество знаков в результате можно указать другое, но раз Вам нужна точность до сотых, после запятой достаточно двух цифр. Поэтому как вариант формата печати результата L:6:2. Также можно ввод начальных данных и вывод результата сделать не на экран, а в файлы.