• Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности не ограничена). Ниже представлен рекомендуемый вид экрана во время работы программы:
    *Определение максимального числа последовательности положительных чисел*
    Вводите после стрелки числа. Для завершения введите ноль

Ответы 3

  • выдает ошибку в этой строке! If KeyPressed = true than
  • А какая?
  • Turbo Pascal:Program readInteger;Uses CRT;Var s:char; z:Integer;BeginClrScr;WriteLn('Введите числа:');repeatIf (KeyPressed = true) thanbeginS:=ReadKeyz:=z+1;End;Until s ="0";Write('Вы ввели ',z,' чисел!');ReadLn;End.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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