В чем ошибка? Известна длина окружности. Найти её радиус. в паскале
Hitoha Marui
Ученик
(235),
на голосовании
11 лет назад
вот решение: program F; VAR l: integer; r:real; const pi=3.14; begin write ('введите длину окружности '); read (l); R:=L/(2*pi); writeln('радиус окружности равен ',r) ; end.
и в чем она проявляется? На первый взляд правильно, единственное тонкое место: R:=L/(2*PI) L - целое, R -real. где-то может произойти усечение результата
program F;
VAR l: integer; r:real;
const pi=3.14;
begin
write ('введите длину окружности ');
read (l);
R:=L/(2*pi);
writeln('радиус окружности равен ',r) ;
end.
где-то ошибка..