§4. Структура программы.

(* комментарии *)

PROGRAM <имя программы>;

USES - модули;

{раздел описаний }

LABEL - описание меток;

CONST - описание констант;

TYPE - описание типов;

VAR - описание переменных;

PROCEDURE - описание процедур;

FINCTION - описание функций;

{начало раздела операторов}

BEGIN

операторы ввода, вывода и

обработки данных

END. {конец раздела операторов,

конец программы}

Среди разделов описаний есть раздел описания переменных. Он начинается со служебного слова Var, после которого идет последовательность объявлений переменных, разделенных точкой с запятой. В каждом объявлении перечисляются через запятую имена переменных одного типа, после каждого списка имен переменных ставится двоеточие Var f,a : integer;

g,y1,y2 : real;

s,s1,s2 : char;

Раздел описания констант начинается со слова CONST.

Пример :

Сonst n=25; r=38;

m=5.15;

Первая программа.

Задача 1 : Написать программу, которая вводит значения двух любых чисел, выводит на экран сумму, разность, произведение и частное от деления этих чисел. Ввод каждого числа произвести с отдельной строке. Каждый результат также нужно поместить на отдельную строку, пояснив в комментарии, чему соответствует выводимое число.

program exampl_1;

var a,b : integer;

begin

writeln('Введите первое число’);

readln(a);

writeln('Введите второе число’);

readln(b);

writeln('A+B= ', a+b:5);

writeln('A-B= ', a-b:5);

writeln('A*B= ', a*b:7);

writeln('A div B= ', a div b:5);

writeln('Нажмите <Enter>');

readln;

end.

Сохранение программы.

Для того чтобы сохранить программу, необходимо либо, либо :

• нажать Enter, в вертикальном меню выбрать команду Save as... и нажать клавишу Enter;

• в появившемся окне ввести имя файла и нажать Enter;

Компиляция программы

или

• выйти в верхнее меню и выбрать команду Compile и нажать клавишу Enter;

или

• нажать клавишу ALT-F9.

Запуск программы на выполнение.

или

• выйти в верхнее меню и выбрать команду RUN и нажать клавишу Enter;

или

• нажать клавишу CTRL-F9.

Алгоритм работы с программой

1. Написать программу на бумаге.

2. Запустить Турво Паскаль.

3. Набрать программу при помощи клавиатуры.

4. Сохранить программу на диске.

5. Запустить программу на компиляцию.

6. Запустить программу на выполнение.

Наша программа есть пример линейного алгоритма.

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

• ввод исходных данных (может отсутствовать, тогда данные задаются внутри программы),

• последовательные команды - обычно вычислительного характера;

• вывод результатов (должен присутствовать обязательно).

Задача 2 : Написать программу определения цифр трехзначного числа.

program examp2_1;

var a, z1,z2,z3, rez : integer;

begin

writeln('Введите число’); readln(a);

z1:=a Mod 10;

writeln('Цифра единиц числа - ’z1);

z2:=(a Div 10) Mod 10;

writeln('Цифра десятков числа - ’z2);

z3:=a Div 100;

writeln('Цифра сотен числа - ’z3);

rez:=z3*100+z2*10+z1;

writeln('Это тоже число - ’rez);

end.