• Составить программу вычисление площади круга.

Ответы 1

  • program prog;uses crt;var  s,r: real;begin  Write('Радиус круга  =  ');  readln(r);    if r>0 then begin  s:=pi*sqr(r);  writeln('S = ',s:0:3);  end  else writeln('Неверный радиус');  end.
    • Автор:

      cher
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years