Задать вопрос
8 марта, 21:07

Найти длину окружности L и площадь круга S заданного радиуса R:

L = 2·π·R, S = π·R

2

+1
Ответы (1)
  1. 8 марта, 23:53
    0
    Var

    r:integer;

    l, s:real;

    const

    pi=3.1415;

    begin

    write ('Введите радиус: ') ;

    readln (r) ;

    l:=2*pi*r;

    s:=2*pi*sqr (r) ;

    writeln ('Длина окружности = ', l,#10,'Площадь круга = ', s) ;

    readln;

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