Дан одномерный массив А,состоящий из N различных элементов. Поменять местами наименьший и наибольший элемнты массива. Полученный массив вывести на печать.
( в basice желательно)
Предмет:
ИнформатикаАвтор:
cobbvar a:array [1..100] of integer; n,i:byte; m,b,c:byte;beginm:=1;b:=1;write('Введите n = ');readln(n);for i:=1 to n do begin readln(a[i]); if a[i]<a[m] then m:=i; if a[i]>a[b] then b:=i; end;c:=a[m];a[m]:=a[b];a[b]:=c;write('Результат: ');for i:=1 to n do write(a[i],' ');end.
П.С. как будет возможность набацаю на бейсике
Автор:
haleДобавить свой ответ
Как очистить химическими методами гвоздь от ржавчины, которая представляет собой смесь оксида железа (III) и гидроксида железа (III), подробно с уравнениями реакций. Заранее спасибо
Предмет:
ХимияАвтор:
emanuelchenОтветов:
Смотреть
у прямокутний трикутник з катетами a,b і гіпотенузою c вписано коло радісом r. Доведіть, що r=(a+b-c)/2
Предмет:
ГеометрияАвтор:
myliegouldОтветов:
Смотреть
Кто может помочь?Только нужно правильно все сделать.
Предмет:
Русский языкАвтор:
beastyxlaОтветов:
Смотреть
Перевести на английский язык 1)Не может быть, что он так много знает. 2) Не может быть, что они сейчас играют во дворе. Уже поздно. 3) Не может быть, что она ещё спит. Уже десять часов. 4) Не может быть, что он опоздал на поезд. 5) Не может быть, что она обманула его. 6) Не может быть, что вы сделали такую ошибку. 7) Не может быть, что она провалилась на экзамене. 8) Не может быть, что она пределе меня. 9) Не может быть, что он бросил курить. 10) Не может быть, что он сделал это 11) Не может быть, что он стал доктором 12) Не может быть, что он перевел эту книгу
Предмет:
Английский языкАвтор:
bebe50Ответов:
Смотреть