Задать вопрос
27 августа, 14:25

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

+3
Ответы (1)
  1. 27 августа, 14:54
    0
    Var r, l, s:real;

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

    readln (r);

    s:=pi*r*r;

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

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Дан радиус окружности, найдите площадь круга (информатика) ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы