Найти максимальный элемент массива на языке делфи
dias2266
2
10.03.2019 08:20
5
Другие вопросы по теме Информатика
AnnI820
13.09.2020 23:50
Йщщ
27.08.2019 02:50
annadarbinyan1
27.08.2019 02:50
Елленаа
27.08.2019 02:50
mitaikooo
27.08.2019 02:50
Файлетмер
27.08.2019 02:50
gulim1902
27.08.2019 02:50
Danil111112
27.08.2019 02:40
Популярные вопросы
- Дано прямокутник зі сторонами a см та b см, в якому 1,5 a 3, 2,4 b 4,5. Оцініть...
2 - № 12 Составление линейных алгоритмов и программ. Составить алгоритмы и программы...
2 - сочинение на тему деолект деревни...
2 - Представьте себя экскурсоводом, предложите маршрут виртуального путе- шествия...
1 - В каком разряде стоит цифра 3 в числе 1928376?...
1 - До іть, будь ласка , з англійською- переробіть ці два речення в усіх часах...
1 - Сравните смешанные числа: А) 1 5/6 1 1/3Б) 5/6 1 1/3С) 5/6 = 1 1/3...
3 - Task 1. Поставьте глаголы в скобках в правильную форму -ing фирма (геруний) или...
3 - 1. Что такое карта? а) справочник; б) источник информации; в) продукт труда многих...
2 - В июле 1867 г. Александр II своим указом образовал: * Астраханское генерал-губернаторство...
2
Function Max (x: massiv): integer;
var i,m: integer;
begin
m:=x[1];
for i:=2 to N do
if x [ i ] > m then
m:=x [ i ];
Max:=m;
end;