С алгоритмом - QBasic

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

Задан одномерный числовой массив MT(4,5) найти минимальное

Решение задачи: «С алгоритмом»

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

DIM a(5)
FOR i = 1 TO 5
    INPUT a(i)
    PRINT a(i)
NEXT
min = a(1)
FOR i = 2 TO 5
    IF min >= a(i) THEN min = a(i) ELSE min = min
NEXT
PRINT "min="; min

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

Создается массив a размером 5 с помощью команды DIM a(5).
Задаются значения элементов массива a с помощью цикла FOR и оператора INPUT. Значения элементов массива выводятся на экран с помощью оператора PRINT и ссылки на элемент массива в формате a(i).
В переменной min хранится наибольшее значение из элементов массива a(1) с помощью цикла FOR и оператора IF.
Значение переменной min выводится на экран с помощью оператора PRINT и команды PRINT min=; min.