profile
Опубликовано 6 лет назад по предмету Информатика от stalker74

Найти максимальный элемент массива на языке делфи

  1. Ответ
    Ответ дан Кaterinka

    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;

Самые новые вопросы