Стандартные процедуры

    • Dec(i); {i:=i-1}
    • inc(i); {i:=i+1}
    • GotoXY(i,j); {перемещение курсора в указанную точку экрана с координатами i, j}
    • str(x,S); {идентификатор численного типа x переводит в строковую переменную S: x→S. }{ Требуется модуль Crt}
    • Clrscr; {очистка экрана} {Требуется модуль Crt }

Константы

Pi {число π = 3.14…}

Вывод результатов

    • Write(x); {вывод на экран значения x: при реальном x=4, на экран выводится "4.0000000000E+00"}
    • Write(x:5:1); {вывод форматированных данных, то есть выделение на экране заданного количества позиций для вывода идентификатора: 5 показывает общее число позиций, 1 – число знаков после запятой: при x=4, на экран выводится "4.0"}
    • Writeln(x); {вывод с новой строки}
    • Writeln(x,y); {вывод двух значений идентификаторов}
    • Writeln(‘x= ’,x:4:1); {вывод с комментариями и форматированием: "x= 4.0"}
    • Writeln(‘Площадь круга радиусом 3 м равна’,3.14*sqr(3):4:1); {Вывод с комментариями и выполнением расчетов: "Площадь круга радиусом 3 м равна 28.3"}

Технология программирования

Включает пять технологических операций (этапов):

    1. Постановка задачи.
    2. Математическое описание.
    3. Алгоритм – структограмма.
    4. Написание текста программы.
    5. Отладка, получение результатов.

При разработке программ будем последовательно выполнять технологические этапы программирования, для наглядности помещая их в таблицу.

Пример. Определить площадь круга.

Этапы разработки программы сведены в таблицу.

Таблица

N Этапы программирования Выполнение
1. Постановка задачи Составить программу для вычисления площади круга радиусом R.
2. Математическое описание Расчетная формула: S=πR2
3. Разработка алгоритма (структограммы)
Описание R,S
Ввод R
Расчет S=πR2
Вывод S
4. Написание программы Program P1; { программа вычисления площади круга} Var r,S:real;{Описание переменных} Begin Read(R); {в этом месте программа останавливается, для ввода числового значения R} {R:=4;}{другой вариант ввода исходных данных} S:=3.14*Sqr(R); {расчет} {S:=Pi*sqr(R);} {другой вариант расчета} Writeln(‘R=’,R:3:1, ‘S=’,S:8:4); {Вывод} end.
5. Отладка и получение результатов R= 4.0 S= 48.7654



Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: