tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дан массив действительных чисел.
Дан массив действительных чисел. найти сумму трех его наибольших чисел. заметим, что массив вначале следует отсортировать по неубыванию, а затем три последних элемента и дадут искомый результат.(basic)
djghjc13
2 02.09.2019 20:10
1
Ответы
resdo9988
06.10.2020 13:05
PRINT "Array size: "
INPUT n
PRINT "Input array: "
DIM a(n), t AS DOUBLE
FOR in = 1 TO n
INPUT a(in)
NEXT in
FOR i = 1 TO n
FOR j = n - 1 TO i STEP -1
IF a(j) > a(j + 1) THEN
t = a(j)
a(j) = a(j + 1)
a(j + 1) = t
END IF
NEXT j
NEXT i
PRINT a(n - 2)
PRINT a(n - 1)
PRINT a(n)
Сначала вводится количество элементов в массиве, затем сами элементы. После ввода последнего элемента программа выводит три наибольших числа.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ZKRMT
21.05.2019 21:25
Знайти мінімальний за модулем елемент, його індекс та присвоїти йому значення добутку цих даних....
Liliyaph
21.05.2019 21:19
Второе .найдите ошибку в записи программы....
Silkerd
06.04.2021 22:09
Составьте программу для вычисления площади треугольника со сторонами а в с...
sergey1234567890f
06.04.2021 22:16
1. Запишите, чем отличаются программы Блокнот и WordPad. 2. Найдите в Справочной системе и запишите ответ на вопрос, что делает дефрагментация диска? 3. Рассчитайте в программе...
muliku
12.07.2019 15:10
1. дано целое число, лежащее в интервале от 1 до 1000000. найти все цифры данного числа, переставить их наоборот, уменьшить его в три раза. в полученном числе найти первую и...
Anna128376373
12.07.2019 15:10
Какие настройки можно сделать дома в виндовс...
Mrkronomax
22.11.2019 20:22
Сделайте и скиньте таблицу как вы сделаете...
отличница474
22.11.2019 18:36
Начертите блок схем площади квадрата и периметр квадрата ...
Mew3200
18.04.2019 07:58
Найдите значение выражений дробей 1-3/8*3 1/5...
Lakensssss
18.04.2019 07:59
Построить график функции y=x^2-2 и объясните как построить правильно таблицу x y...
Популярные вопросы
Обчисліть зручним 5/7×(-2,6)×0,6×(-2 1/3)...
3
Вычислите значение выражения наиболее удобным 0,5*74,8*2: 0,42*5,19+5,19*0,58:62,9*1,8-62,7*1,8...
1
Температура з глибиною:а) підвищується; б) знижується....
2
Write an article for a local magazine about towns / cities in your country,...
1
Утвори й запиши прикметники за до : • суфіксів здрібнілості, пестливості...
2
Тіло кинули з башти горизонтально. Через 1,5 с його швидкість збільшилась...
2
Что не было причиной Руины...
2
Укажіть:а) Прямий кут;б) Гіпотенузу;в) Катети;г) Гострі кути....
1
Привет всем кто с заданиями) Мне нужна с это задачей по биологии. Можете...
3
Какие территории были присоединены к Москве при Иване III?...
3
INPUT n
PRINT "Input array: "
DIM a(n), t AS DOUBLE
FOR in = 1 TO n
INPUT a(in)
NEXT in
FOR i = 1 TO n
FOR j = n - 1 TO i STEP -1
IF a(j) > a(j + 1) THEN
t = a(j)
a(j) = a(j + 1)
a(j + 1) = t
END IF
NEXT j
NEXT i
PRINT a(n - 2)
PRINT a(n - 1)
PRINT a(n)
Сначала вводится количество элементов в массиве, затем сами элементы. После ввода последнего элемента программа выводит три наибольших числа.