В заданном массиве определить количество элементов, которые меньше заданного значения - QBasic

Формулировка задачи:

первая задача: В заданном массиве А(N) определить количество элементов, которые меньше заданного значения вторая задача: Запишите заданное смешанное число в виде неправильной дроби третья задача: Дана матрица A(N,M). поменяйте местами ее наибольший и наименьший элементы(первые по порядку,если их несколько).порядок просмотра элементов матрицы слева направо и сверху вниз срочно нужна ваша помощь.Пожалуйста помогите мне решить эти задачи и сделать для каждой из них блок схемы

Решение задачи: «В заданном массиве определить количество элементов, которые меньше заданного значения»

Листинг программы

CLS
INPUT "N"; n
INPUT "chislo"; c
RANDOMIZE TIMER
DIM a(n)
PRINT "Massiv A:"
FOR i = 1 TO n
    a(i) = INT(100 * RND(1) - 50)
    PRINT a(i);
    IF a(i) < c THEN k = k + 1
NEXT
PRINT
PRINT "kol-vo"; k

Объяснение кода листинга программы

CLS — команда очистки экрана
INPUT N; n — запрос на ввод количества элементов в массив
INPUT chislo; c — запрос на ввод значения, которое необходимо найти в массиве
RANDOMIZE TIMER — команда для работы с генератором случайных чисел
DIM a(n) — создание массива a размером n
PRINT Massiv A: — вывод сообщения с названием массива
FOR i = 1 TO n — начало цикла по элементам массива
*a(i) = INT(100 RND(1) — 50)** — заполнение элемента массива случайным числом от 0 до 99
PRINT a(i); — вывод значения элемента массива
IF a(i) < c THEN k = k + 1 — увеличение счетчика k, если значение элемента меньше заданного
NEXT — конец цикла по элементам массива
PRINT — вывод сообщения
PRINT kol-vo; k — вывод значения счетчика k