Найти максимальный элемент массива…

Question

Найти максимальный элемент массива, состоящего из 10 элементов в Delphi

Answer 1

33

m10ss

17 марта 2023

program massiv; var a: array[0… 9] of integer; i,m: integer; begin// заполняем массивfor i: =0 to 9 do readln (a[i]); // вводим поочередно 10 чисел// вычисляемfor i: =0 to 9 do if (a[i] > m) then m: =a[i]; writeln (m); readln; end.

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

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

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

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

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