Помогите СРОЧНО НАДО написать программу в паскале вычисления площади круга если известна длина окружности

1

Ответы и объяснения

Лучший Ответ!
2014-04-09T14:04:08+04:00
Program qq;
uses crt;
var L,S,R:real;
BEGIN
clrscr;
writeln('Введите длину окружности');
read(L);
R = L / 2 * 3.14:
S:= 3.14 * R * R;
writeln('Результат ',S:4:4); 
readln;
readln;
END
Попробуй так