Нужно решить задачку: Найти максимальное и минимальное число

Question

Нужно решить задачку: Найти максимальное и минимальное число (Блок схема и программа) Работаем в Паскале

Answer 1

65

piragi

04 сентября 2022

Если водится n чисел то вот программаprogram maxmin; var a: array[1… 1000]of longint; i,n,max,min: longint; beginread (n); for i: =1 to n doread (a[i]); min: =a[1]; max: =a[1]; for i: =1 to n dobeginif a[i]max then min: =a[i]; end; writeln ('min=',min,'max=',max); end.

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

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

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

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

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