• почему в частном пишет NaN? помогите пожалуйста
    program up1;
    var a,b,c:integer;x:real;
    begin
    x:=a/b/c;
    writeln('Введите первое число');
    read(a);
    writeln('Введите второе число');
    read(b);
    writeln('Введите третье число');
    read(c);
    writeln('произведение чисел ',a,'*',b,'*',c,'=',a*b*c);
    writeln('частное чисел ',a,'/',b,'/',c,'=',x);
    end.

Ответы 4

  • спасибо
    • Автор:

      mitch
    • 6 лет назад
    • 0
  • как отметить лучший ответ
    • Автор:

      ranger63
    • 6 лет назад
    • 0
  • ???
    • Автор:

      raven43
    • 6 лет назад
    • 0
  • Вы попробуйте вычислить значение х не до ввода a,b,c а после:program up1;var a,b,c:integer;x:real;begin  writeln('Введите первое число');  read(a);  writeln('Введите второе число');  read(b);  writeln('Введите третье число');  read(c);  x:=a/b/c;  writeln('произведение чисел ',a,'*',b,'*',c,'=',a*b*c);  writeln('частное чисел ',a,'/',b,'/',c,'=',x);end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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