Задать вопрос
23 марта, 06:43

Дан радиус окружности, найдите площадь круга (информатика)

+2
Ответы (1)
  1. 23 марта, 07:42
    0
    Var r, l, s:real;

    beginwrite ('Введите радиус окружности R = ') ;

    readln (r) ;

    s:=pi*r*r;

    write ('Площадь круга = ', s:0:2) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дан радиус окружности, найдите площадь круга (информатика) ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы