Язык программирования Паскаль

информатики Швейцарской высшей политехнической школы Николаусом Виртом в 1968-1970 гг.

бы неверно. Вот что говорил об этом Н. Вирт (1984

более популярным, причем не только, как язык для обучения принципам

Блеза Паскаля, который еще в 1642 г. изобрел первую механическую

(машинный язык) – двоичная знаковая система.
Поэтому, чтобы компьютер мог

и компиляция:
Интерпретатор переводит и выполняет программу строка за строкой.
Компилятор

компания Borland International. Она сумела создать знаменитую Turbo-среду разработки. Это

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

при составлении текстов.
Алфавит языка - набор таких символов.

Алфавит языка Turbo

существует набор строго определенных слов, которые называются служебными или зарезервированными

Основные средства языка

и знаков подчёркивания, начинающееся с буквы.

Числа: целые,

Шесть операций: + сложение, - вычитание, / деление, * умножение, mod нахождение остатка, div деление нацело.

функций.

Для указания порядка действий используются только круглые скобки.
Для возведения в

Модуль обозначается abs(х).

переменной
Если переменная слева вещественного типа, то арифметическое выражение может быть

часть – программный блок.
Общий вид программы:
Program (имя

begin (начало программного блока)
(алгоритм)

end. (конец программы)

точкой.
Описательная часть состоит из 4 разделов: меток, констант, имён и

Программный блок содержит операторы, описывающие алгоритм решения задачи.

и ждёт, пока пользователь наберёт на клавиатуре числа (через пробел)

write (список вывода) – выводит данные на экран. Список вывода - перечисленные через запятую имена результатов вычисления и пояснительные тексты в апострофах. Например: write(‘х=‘, х); На экране напечатается число с фиксированной точкой. Например: write(‘х=‘, х:6:2); на экране будет выдано число из 6 знаков из них два после запятой, (х = -23.57 ).
Перевод курсора на новую строку осуществляется оператором пустого вывода writeln. Оператор пустого ввода readln

вещественных чисел найдите сумму, произведение и разность

через пробел, затем нажмите ’);
readln (a,b);

New – создать новый файл
Enter – следует поставить в конце

сохранения программы наберите путь и наберите имя файла

через пробел, затем нажмите ’);
readln (a,b);

ELSE оператор 2;

а несколько операторов. Тогда эти операторы заключаются в операторные скобки. Открывающая

IF условие THEN begin оператор 1; оператор 2; оператор N end ELSE begin оператор 1; оператор 2; оператор M end ;

условие THEN оператор 1 ELSE оператор 2; - полный условный

числа через пробел, затем нажмите ’);
readln (a,b);

6, если a< =0
Составьте программу для вычисления Y и назовите

Y=

нажмите ’);
readln (a);
if a >0

a*b, если a< =b
Составьте программу для вычисления X и назовите

X=

через пробел затем нажмите ’);
readln (a);

перехода
goto n, n - целое число (не более 4-х

первых двадцати чисел. (1+2+3….+20).

а 1

s: integer;
begin
write (‘введите два целых числа через пробел, затем

может быть простым и составным
begin……… end – операторные скобки
Задача.
Вычислить наибольший

величину меньшего до тех пор, пока оба числа не станут

Исходные 1 шаг 2 шаг 3 шаг
а= 25
b=15

1015

105

5 5

НОД(а,b)=5

(‘НОД=‘,а);
readln;
end.
write (‘Введите два натуральных числа через пробел’);
readln (a,b);
while

if a>b then a:=a-b
else b:=b-a;

until может быть любое количество операторов без использования операторных скобок.
Задача.
Вычислить

(‘НОD=‘,а);
readln;
end.
repeat

until a=b;
if a>b then a:=a-b;
if b>a then b:=b-a
write

с n1 до n2 выполнить оператор»
i – переменная цикла;
Если i+1

Оператор может быть простым и составным
begin……… end – операторные скобки

= 120

: integer;
begin





write
readln;
end.

n, р,

р: = 1;

i

for i: = 1 to n do

p: = p*i ;

(n , ‘!=‘ , p);