Задать вопрос
23 января, 04:02

Дан одномерный массив заполненный двузначными числами найти наибольший элемент массива и наименьший. поменять их местами и новый массив вывести на экран

+3
Ответы (1)
  1. 23 января, 04:40
    0
    Var

    n, i, mn, mx:integer;

    a:array [1 ... 10] of integer;

    begin

    randomize;

    writeln ('Ishodnii massiv') ;

    for i:=1 to 10 do

    begin

    a[i]:=random (90) + 10;

    write (a[i],' ') ;

    end;

    writeln () ;

    mn:=1; mx:=1;

    for i:=1 to 10 do

    begin

    if a[mn]>a[i] then mn:=i;

    if a[mx]
    end;

    n:=a[mn];

    a[mn]:=a[mx];

    a[mx]:=n;

    writeln ('Massiv posle obrabotki') ;

    for i:=1 to 10 do

    write (a[i],' ') ;

    writeln () ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дан одномерный массив заполненный двузначными числами найти наибольший элемент массива и наименьший. поменять их местами и новый массив ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
1. Дан одномерный массив размерностью 10, заполненный целыми числами, введенными с клавиатуры, и величина N. Отрицательные элементы заменить на N. Измененный массив вывести на экран одной строкой. 2.
Ответы (1)
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
1) Заполнить массив размером N целыми числами последовательно от 1 до N. Вывести его на экран. Найти сумму элементов массива и вывести ее на экран. 2) Заполнить массив размером N целыми числами последовательно от N до 1. Вывести его на экран.
Ответы (1)
В pascal. 1) Заполните массив случайными числами из интервала [-50; 50), вывести на экран, посчитать сумму отрицательных элементов. 2) Ввести одномерный массив, вывести его на экран, найти максимальный элемент и его порядковый номер.
Ответы (1)
1.) Вывести на экран одномерный целочисленный массив, состоящий из 10 целых чисел из диапазона [-100; 100] 2.) Задан одномерный целочисленный массив, состоящий из 7 случайных чисел.
Ответы (1)