QBASICBOOK.ru: сайт про QB64

Задача. Напечатать таблицу умножения от 1 до 20 при помощи цикла FOR...NEXT.

Ответ на подобные задачи выглядят следующим образом:

---

1. DIM A(20)
2. FOR I = 1 TO 20
3.   A(I) = I * I
4.   PRINT USING " ## "; I;
5.   PRINT " * ";
6.   PRINT USING " ## "; I;
7.   PRINT " = ";
8.   PRINT USING " ### "; A(I)
9. NEXT

---

Рисунок 1 – Использование массива в цикле с параметром

Рисунок 2 – Вывод таблицы умножения при помощи цикла с параметром

Тут все просто! Вначале объявляем массив из 20 элеметов. Затем в цикле переменожаем переменную-счетчик на саму себя и записываем результат в ячейку массива. Здесь же выводим значения элементов массива на экран по заданному формату.

Спасибо за прочтение этой статьи.