Написать программу, которая определяет максимальное - вопрос №4463542 от Nika1032 03.02.2022 22:20

Question

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

Nika1032 · Answer

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....