ма програми} {Підключення модулів} {Розділ оголошення міток} {Розділ оголошення констант} {Розділ оголошення нових типів} {Розділ оголошення змінних} {Опис своїх процедур} {Опис своїх функцій} {початок основної програми}
{Оператори}.
Обов'язковою частиною є лише тіло програми, що починається словом begin, а закінчується словом end з крапкою. Оператори в Паскалі розділяються крапкою коми. Тема програми є хоча і необов'язковим, але бажаним елементом і складається з зарезервованого слова program і ідентифікатора - імені програми, за якому слід крапка з комою. Порядок оголошень і описів не регламентується. p align="justify"> Приклад: Найпростіша програма.
prim_1; {демонстрація структури програми}
{ця програма не вимагає ніяких оголошень і описів}
write ('Привіт! Ось ми і почали.') (* цей рядок тексту з'явиться на екрані *).
Наведемо приклад неправильного і правильного структурування:
program p1; var, b, c: real; begin
writeln ('Введіть значення A і B:'); read (a, b);
c: = a + b; writeln ('A + B =', c); c: = ab; ('AB =', c); end.
Текст цієї програми структурований явно невдало, набагато краще він сприймається так:
program p1; a, b, c: real;
writeln ('Введіть значення A і B:');
read (a, b);: = a + b; ('A + B =', c);: = ab; ('AB =', c);.
3.7 Приклади розв'язання задач на мові Паскаль
1 . Одна сторона прямокутника на 5 см. довше іншої, а сума їх довжин дорівнює 17 см. Знайти сторони цього прямокутника.
Задачу вирішимо в загальному вигляді: позначивши ширину прямокутника - storona1, довжину - storona2, різниця сторін - raz, суму довжин сторін - summa.
program primer1;
var summa, raz, st: real;, storona2: real;
begin ('Введіть суму довжин сторін прямокутника'); (summa); ('Введіть на скільки одна сторона більше інший');
readln (raz);: = (summa - raz)/2;: = st;: = st + raz; ('ширина-', storona1: 7:2, 'див.') ; ('довжина-', storona2: 7:2, 'див.');
end.
2 . Нафтобаза відпустила за два дні 2560 л. бензину. У другий день база відпустила на 280 л. більше. Скільки літрів бензину база відпустила окремо за кожний день...
