• Помогите исправить ошибки.

    Листинг программа:

    Program Posledow;

    Var x, y: real;

    Begin

    x:=8

    Repet` y:=SQR(x-8)/6;

    Writeln (x:8:3, y:8:3);

    x:=x+6;

    Until y+5<0;

    End.

Ответы 1

  • Program Posledow;Var x, y: real;Beginx:=8;Repeat y:=SQR(x-8)/6;Writeln (x,' ',y);x:=x+6;Until y+5<0;End.

    ---

    проверь, пожалуйста, правильность программы по условию, потому что очень большой вывод получается.

    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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