сделать (в бэйсике) сортировку чисел, массив (100), по убыванию и составить блок схему
10-11 класс
|
10 DIM a(100)
15 PRINT "неотсортированный массив"
20 FOR i = 1 TO 100
30 a(i) = RND * 100
40 PRINT a(i)
50 NEXT i
60 FOR i = 1 TO 99
70 FOR j = i + 1 TO 100
80 IF a(i) > a(j) THEN GOTO 120
90 p = a(i)
100 a(i) = a(j)
110 a(j) = p
120 NEXT j
130 NEXT i
135 PRINT "отсортированный массив"
140 FOR i = 1 TO 100
150 PRINT a(i)
160 NEXT i
Другие вопросы из категории
истинность высказывания: «Данные поля имеют одинаковый цвет».
помагите решить
ей лет, он задал ей вопрос на что она ответила, мне 33 года, моей маме 124 года, а папе 131, а вместе нам 343. какую систему счисления использовала Маша?
Дан массив
целых чисел К(15), найти и вывести на печать отрицательные элементы из
этого массива.
Вводится последовательность из N положительных целых чисел. Найти наименьшее число среди чётных элементов последовательности.
Lazarus
Читайте также
датчика случайных чисел random(). Сортировать один и тот же исходный
массив и по убыванию и по возрастанию значений элементов.
использования. Пример: Введите число: 100 сумма = 5050
"5":
Составить функцию, которая определяет, сколько зерен попросил положить на N-ую клетку изобретатель шахмат (на 1-ую – 1 зерно, на 2-ую – 2 зерна, на 3-ю – 4 зерна, …) Пример: Введите номер клетки: 28 На 28-ой клетке 134217728 зерен.
возрастанию.
пожалуйста=***
Прямоугольную матрицу размером n на m заполнили целыми числами по алгоритму, представленному на блок-схеме.
Какое количество положительных чисел получилось в матрице, если n=12, а m=20?
В ответе укажите только число.