Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
АлiнаКукушкiна
23.12.2021 14:16 •
Информатика
Водномерном массиве из n чисел переставить местами больше и маленькое (составить программу на бейсике)
Показать ответ
Ответ:
anton20063
21.08.2020 13:24
REM пишу по памяти
CLS
INPUT n
xMin=n
xMax=0
min=10^9
max=-10^9
DIM a(n)
FOR i=1 TO 10
INPUT a(i)
IF a(i)<min THEN min=a(i) : xMin=i
IF a(i)>max THEN max=a(i) : xMax=i
NEXT i
k=a(xMax)
a(xMax)=a(xMin)
a(xMin)=k
END
0,0
(0 оценок)
Популярные вопросы: Информатика
БИОЛОГИЯ1204
07.09.2021 20:16
Блок схемы несет следующую смысловую нагрузку: а) блок ввода/вывода б) блок начала алгоритма в) блок действий г) блок начала цикла...
lololokgjh
17.04.2020 12:11
Сколько бит памяти занимает чёрно-белое изображение (без градаций серого) шириной 9000 точек и высотой 400 точек?...
loza83olesya
24.09.2021 16:59
Даны положительные числа А и В (А В). На отрезке длины А размещено максимально возможное количество отрезков длины В (без наложений). Не используя операции умножения и деления,...
Super364
20.04.2022 01:59
Гидороскопиялық дачик қызыметі қандай...
Chechenec001
26.03.2020 08:12
Написать программы (мы работаем в python): 1) найти дискриминант по введённым коэффициентам квадратного уравнения.2) найти площадь треугольника по введённым координатам его вершин....
Egoregoryts
21.04.2023 12:22
Из перечисленного: 1)прямой ущерб, нанесенный работником; 2) противоправность поведения работника; 3)причинная связь между ущербом и противоправным...
ugifhuf
21.04.2023 12:22
Коллективный договор регистрируется в течение 7 дней со дня подписания его сторонами:...
kolesnikov20021
21.04.2023 12:22
По действующему законодательству, обеденный перерыв, предоставляется, как правило через 4 часа после начала работы за 4 часа до конца работы...
LilyaDolz
21.04.2023 12:22
Не допускается заключение брака между лицами, из которых хотя бы одно лицо уже состоит в другом браке:...
kabdushevaaynash
21.04.2023 12:22
Увольнение работника по инициативе администрации возможно по основаниям, предусмотренным ТК РФ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
CLS
INPUT n
xMin=n
xMax=0
min=10^9
max=-10^9
DIM a(n)
FOR i=1 TO 10
INPUT a(i)
IF a(i)<min THEN min=a(i) : xMin=i
IF a(i)>max THEN max=a(i) : xMax=i
NEXT i
k=a(xMax)
a(xMax)=a(xMin)
a(xMin)=k
END