Имеется массив целых чисел размером N. Заполнить его случайными ...
Имеется массив целых чисел размером N. Заполнить его случайными числами в диапазоне от n1 до n2 (n1 и n2 вводятся с клавиатуры). Вывести его на экран. На место максимального элемента массива записать число 9999 получившийся массив вывести на экран. Если максимальных элементов несколько, то все их заменить на 9999. ПОМОГИТЕ РЕШИТЬ ПОЖАЛУЙСТА! НУЖНО РЕШИТЬ В PASCAL ABC!
Есть ответ
17.12.2022
493
Ответ
program noname;uses crt;vara:array[1..10000] of integer;i,n,max,n1,n2:integer;beginclrscr;writeln('введи размерность массива');readln(n);write('n1='); readln(n1);write('n2='); readln(n2);for i:=1 to n do beginrandomize;a[i]:=random(n2-n1+1)+n1;write(a[i],' ');end;writeln;max:=a[1];for i:=2 to n doif max
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022