• Исправьте код пж даю 20 б



    Program(infinity);
    Begin
    Const PI=3.14;
    Var(I,S,r):real;
    Writeln(BBEDI RADIYS);
    readln(r);
    I:=2*PI*r;
    S:=PI*r*r;
    Writeln(`I=`,I `S=`,S);
    End



    Ошибка ожидался Интефикатор
     Паскаль АВС

Ответы 6

  • Ну и в чем тут нарушение?
  • "Quos Deus perdere vult dementat prius" ( лат. "Кого Бог хочет погубить, того он сначала лишает разума")
    • Автор:

      mckenzie
    • 6 лет назад
    • 0
  • "Поздравляю тебя, Шарик, ты - балбес" (с)
    • Автор:

      elliscjdb
    • 6 лет назад
    • 0
  • код не работает
    • Автор:

      chase2
    • 6 лет назад
    • 0
  • А у меня нормально работает, представляете?
    • Автор:

      indiamycl
    • 6 лет назад
    • 0
  • Program infinity;Const PI=3.14;beginVar I,S,r:real;Writeln('BBEDI RADIYS');readln(r);I:=2*PI*r;S:=PI*r*r;Writeln('I=',I,'S=',S);End.
    • Автор:

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

Войти через Google

или

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

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

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