С клавиатуры вводятся 12 чисел. Найти максимальное

Question

С клавиатуры вводятся 12 чисел. Найти максимальное. По информатике сделать втурбопаскаль

Answer 1

41

wicks

09 сентября 2022

program chisla; var A: array [1… 12] of integer; max: integer; i: integer; beginmax: =0; writeln ('введите 12 чисел'); readln (A[12]); for i: =1 to 12 doif A[i] > max then max: =A[i]; writeln ('максимальное число=', max); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: