Renee Littleпосчитайте, пж. Выполнить задание в Паскале. Дан массив из 10 чисел. Найти наибольшее значение среди элементов массива и вывести его на экран. Входные данные для решения задания задать самостоятельно. Нужен код.
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
var i,max:integer; a:Array[1. . 10] of integer = (5,4,9,8,4,8,2,3,8,7);
begin
max := a[1];
for i:=2 to 10 do begin
if max < a[i] then max := a[i];
end;
write('Максимальный элемент массива равен ', max);
end.
421
VasilЧтобы ответить необходимо зарегистрироваться.
