Есть ответ 👍

Натйти максимальный по модулю элемент и его порядковый номер. составить программу в паскале

108
146
Посмотреть ответы 2

Ответы на вопрос:


Var a: array [0..10] of integer;     i, m: integer; begin       for i : = 0 to 10 do       begin           a[i] : = random(50) - 25;           writeln('[', i, '] => ', a[i]);       end;             for i : = 0 to 10 do           if (abs(a[i]) > abs(a[m])) then             m : = i;       writeln('[', m, '] => ', a[m]); end.

скинь фото а то как ответить

Популярно: Информатика