Напишите пожалуйста в Паскаль.Массив из 15 элементов заполнить случайными четными числами в интервале от -25 до 70. Вывести полученный массив на экран в строчку.Найти сумму наибольшего и наименьшего элементов массива. (Использо...
Напишите пожалуйста в Паскаль.
Массив из 15 элементов заполнить случайными четными числами в интервале от -25 до 70. Вывести полученный массив на экран в строчку.Найти сумму наибольшего и наименьшего элементов массива. (Использовать пузырьковую сортировку).
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,c:integer; m2:array [1..15] of integer;
begin
for a:=1 to 15 do
begin
m2[a]:= random (95)-25;
write (m2[a], ' ');
end;
for a:=1 to 15 do
for c:=1 to 14 do
if m2[c]
Не нашли ответ?
Похожие вопросы