Лінійні програми відповідають базовій структурі “проходження” (“следование” російською):
Основний блок лінійної програми уявляє з себе послідовність операторів введення початкових даних, присвоєння значень змінним та виведення проміжних та остаточних результатів..
Cкладемо програму обчислення довжини кола та площі круга заданого радіусу R.
PROGRAM PERSHA;
{Довжина кола та площа круга радіуса R }
CONST
PI=3.14159;
VAR
R,L,S: REAL;
BEGIN
WRITELN(‘Ввести радіус R’);
READ(R);
WRITELN(‘Радіус = ’,R);
L:=2*PI*R;
WRITELN(‘Довжина кола = ‘,L);
S:=PI*R*R;
WRITELN(‘ Площа круга = ’,S);
WRITELN(‘ R= `,R:5:2,’ ‘:5,’ L=’, L:10:3,’ ‘:5,’ S= ‘,S:12)
END.
Число π можна було не оголошувати як константу, бо в ТП воно відоме (див. Таблицю математичних ф-ій ), як PI.. В останньому операторі виведення передбачено пропуск в 5 позицій між значеннями R,L,S, а самі значення виводяться в різних форматах: R та L – із десятковою крапкою, S – в експоненціальній формі.
При реалізації програми на ПК треба виконувати такі дії:
· Ввійти в середовище ТП , запустивши TURBO.EXE.
· Ввійти в меню , натиснувши F10 .
· Вибрати File ® New , щоб створити нову програм
· Набрати програму .
· Ввійти в меню, натиснувши F10.
· Вибрати Compile ® Compile для перевірки на синтаксичні помилки та компіляції програми .
· Якщо є помилки , виправити їх та повторити попередній пункт.
· Ввійти в меню (F10) та вибрати Run ® Run , щоб запустити програму на виконання.
· Ввести дані з клавіатури.
· Для перегляду результатів натиснути ALT+F5;
· Для повернення до тексту програми натиснути ті ж самі клавіші.
· Для запису програми на дискету треба натиснути F10 і вибрати в меню File ® Save as та в діалоговому вікні набрати ім’я програмного файла.
· Для виклику на виконання готової програми натиснути F10 і вибрати File ® Open та набрати у вікні, що з’явиться на екрані , ім’я програмного файла.
·
