Задать вопрос
24 сентября, 22:20

Переделать программу под оператор read

program n_1;

const pi = 3.14;

bar = r, c, s: real

begin

r:=5.4;

c: = 2*pi*r;

s:=pi*r*r;

writeln ('c=', c:6:4);

writeln ('s=', s:6:4)

end

+2
Ответы (1)
  1. 25 сентября, 01:12
    +2
    Program n_1;

    var r, c, s: real;

    begin

    readln (r);

    c: = 2*pi*r;

    s:=pi*r*r;

    writeln ('c=', c:6:4);

    writeln ('s=', s:6:4)

    end.

    Пример:

    5

    c=31.4159

    s=78.5398
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Переделать программу под оператор read program n_1; const pi = 3.14; bar = r, c, s: real begin r:=5.4; c: = 2*pi*r; s:=pi*r*r; writeln ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы