• Ошибка в pascal (Встречен конец файла, а ожидался оператор)
    Помогите, что нужно дописать чтобы ошибка исчезла?
    Функция:
    function sqrt1 (a, b, c: real): real;
    begin
    if (2 * a + b - c) < 0 then
    writeln (' complex number ') - проверка на комплексные числа
    else sqrt1:= sqrt(2 * a + b - c);
    end;

Ответы 3

  • Спасибо :) Но теперь другая ошибка - Program11.pas(7) : Встречен конец файла, а ожидалось begin. Поможешь? Пожалуйста.
    • Автор:

      hull
    • 6 лет назад
    • 0
  • Функция должна быть внутри какой-то программы. А в этой программе должно быть begin
  • Нужно что-то присвоить функции для случая, когда (2*a+b-c)<0Например, так:function sqrt1 (a, b, c: real): real;beginif (2 * a + b - c) < 0 thenbegin writeln (' complex number '); sqrt1:=-1; endelse sqrt1:= sqrt(2 * a + b - c);end;
  • Добавить свой ответ

Войти через Google

или

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

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

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