Есть ответ 👍

Создать программу в паскале, 9 класс поменять местами первый элемент масива и максимальный. заранее ) ) ) var a: array [1..20] of integer;

193
237
Посмотреть ответы 2

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

ForaN777
4,7(58 оценок)

Var   a: array[1..50] of integer;   i,n,max,r: integer; begin   randomize;   readln(n);   for i: =1 to n do     begin       a[i]: =random(50)-25;       write(a[i]: 4);     end;   writeln;   max: =1;   for i: =1 to n do     if a[i]> a[max] then max: =i;   r: =a[1];   a[1]: =a[max];   a[max]: =r;   for i: =1 to n do write(a[i]: 4);   readln end.

сейчас напишу ответ погодь

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