Page 22 - 33

Ядро циклу повинно відображати відповідні операції. В нашому випадку
це ввід комплекту вхідних даних, тобто геометричних параметрів ділянки.

Закриття циклу здійснюється командою NEXT із вказанням аргументу
циклу.

Для нашої задачі фрагмент програми блоку вводу даних виглядатиме так:

40 FOR I=1 TO N (STEP 1 можна не писати)

45 INPUT “Зовнішній діаметр, м ”,D1(I)

50 INPUT “Внутрішній діаметр, м ”,D2(I)

55 INPUT “Довжина ділянки, м ”,L(I)

60 NEXT I

Тут треба звернути увагу на те, що індекси пишуться в дужках поруч з

ідентифікаторами.

Аналогічно організовуємо обчислювальний блок, з тою різницею, що в

ядрі циклу повинні бути розрахункові формули, але треба пам’ятати, що цьому

циклу повинні передувати початкові умови.

65 VS = 0

70 FOR I=1 TO N

75 F(I)=PI * ((D1(I)^2 - D2(I)^2) / 4

80 V(I)=F(I) * L(I)

85 VS=VS + V(I)

90 NEXT I

Головною командою для виводу результатів є PRINT або LPRINT. Але

оскільки блок-схемою передбачено вивід у вигляді таблиці, зупинимось на

цьому детальніше.

Перш за усе, слід мати на увазі, що таблиця складається з так званої

“шапки” і числових даних, які її (таблицю) заповнюють. Програмування

“шапки” здійснюється знайомим нам способом за допомогою команди PRINT і

якогось тексту між лапками. Щодо числових даних, то для їх виводу

застосовується цикл, в ядрі якого теж є команда PRINT, але із зовсім іншими

22