Составить программы для вычисления значений функции при заданных значениях аргументов - QBasic

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

Помогите пожалуйста. Составить блок-схемы алгоритмов и программы на языках Бейсик и Паскаль для вычисления значений функции при заданных значениях аргументов. Результаты вычислений вывести в виде таблицы. Выполнить задание двумя способами: а) не используя структуру цикл с параметром; б) используя в качестве циклической структуры только цикл с параметром. a=0.1,0.2 .. 0.5; y=1.0,1.2 .. 1.6

Решение задачи: «Составить программы для вычисления значений функции при заданных значениях аргументов»

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

DEFINT I-K
CLS
DIM f(1 TO 5, 1 TO 4)
 
i = 1
DO
   LOCATE 2 + i, 2
   PRINT "a="; .1 * i
   j = 1
   DO
      a = .1 * i
      y = .8 + .2 * j
      LOCATE 1, 10 * j + 1
      PRINT "y="; y
      FOR k = 1 TO 8
         f(i, j) = f(i, j) + (y - a) ^ (k / 3)
      NEXT k
      LOCATE 2 + i, 10 * j
      PRINT USING "##.####  "; f(i, j);
      j = j + 1
   LOOP UNTIL j > 4
   PRINT
   i = i + 1
LOOP UNTIL i > 5
END

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

В этом коде:

Сначала определяются константы и переменные:
- I-K - предположительно, это два аргумента функции, значения которых неизвестны, так как они не используются в коде.
- CLS - команда очистки экрана.
- f(1 TO 5, 1 TO 4) - массив f размером 5x4, в котором будут храниться результаты вычислений.
Затем создаются две вложенные циклы:
- Внешний цикл i от 1 до 5, который выполняет 5 итераций.
- Внутренний цикл j от 1 до 4, который выполняется столько раз, сколько текущее значение i.
Внутри циклов выполняются следующие действия:
- a принимает значение текущего значения i.
- y вычисляется как сумма 0.8 и 0.2 умноженное на текущее значение j.
- FOR-цикл от 1 до 8 выполняет вычисления и добавляет результат в элемент массива f(i, j).
- Результат f(i, j) выводится на экран с использованием формата ##.#### .
После завершения внутреннего цикла, значение j увеличивается на 1.
После завершения внешнего цикла, значение i увеличивается на 1.
В конце кода выводится символ новой строки (\n), чтобы перейти на новую строку.