М. Кривцов - Конец холивара. Pascal vs C

/ – деление

DIV – деление нацело

MOD – остаток от деления нацело

ABS (X) – абсолютная величина X.

ARCTAN (X) – вычисление угла в радианах, тангенс которого равен X.

COS (X) – вычисление косинуса угла в радианах.

EXP (X) – Вычисление e x.

LN (X) – вычисление натурального логарифма от X.

PI – вычисление числа Пи.

RANDOM – вычисление случайного числа в диапазоне от 0 (включительно) до 1.

RANDOM (N) – вычисление случайного целого числа в диапазоне от 0 (включительно) до N.

ROUND (X) – округление X до ближайшего целого.

SIN (X) – вычисление синуса угла, заданного в радианах.

SQR (X) – вычисление квадрата числа X.

SQRT (X) – вычисление корня квадратного из X.

TRUNC (X) – отбрасывает дробную часть числа X.

Оператор присваивания – :=. Для удобства понимания записи алгоритмов его можно читать, например, так:

X := … – пусть X будет ….

Пример 1.1: Вычисление значений функции Y=1/X.

Если X ≠ 0

то писать (1/X)

иначе писать (‘0 не входит в область определения функции Y=1/X’);

IF X <> 0

THEN WRITE (1/X)

ELSE WRITE (‘0 не входит в область определения функции Y=1/X’);

IF – если.

THEN – то.

ELSE – иначе.

Блок-схема алгоритма вычисления значений этой функции:

Условный оператор

Пример 1.2: Если X <3, то вывести на печать значение X.

IF X <3 THEN WRITE (X);

Неполный условный оператор

> – больше

< – меньше

> = – не меньше

<= – не больше

= – равно

<> – не равно

AND – и.

OR – или.

NOT – не.

Пример сложного (составного) условия:

IF (Z> X) OR (X> Y) THEN…

Переключатель

Пример 1.3.1

Выбрать N из

1: писать (‘N равно единице’);

2: писать (‘N равно двум’);

3, 4: писать (‘N равно трём или четырём’)

Конец;

CASE N OF

1: WRITE (‘N равно единице’);

2: WRITE (‘N равно двум’);

3, 4: WRITE (‘N равно трём или четырём’)

END;

CASE – случай, вариант

OF – из

END – конец

Пример 1.3.2

CASE A> B OF

TRUE: M:=A;

FALSE: M:=B

END;

Такой вариант использования этого оператора соответствует условному оператору.

TRUE – истина

FALSE – ложь

FALSE

Циклом называется группа операторов, которая выполняется повторно. После каждого повторения проверяется условие, называемое условием окончания цикла, по которому принимается решение продолжать повторение или закончить цикл.

Пример 1.4: Нахождение наибольшего общего делителя двух целых положительных чисел с помощью известного алгоритма Евклида.

Пока X ≠ Y делать

если X> Y

то X:=X-Y

иначе Y:=Y-X;

Писать (‘НОД=’, X);

WHILE X <> Y DO

IF X> Y

THEN X:=X-Y

ELSE Y:=Y-X;

WRITE (‘НОД=’, X);

WHILE – пока

DO – делать

Цикл с предусловием

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

Пример 1.5: Решение предыдущей задачи.

Цикл с постусловием

Повторять

если X> Y

то X:=X-Y

иначе Y:=Y-X

до X=Y;

Писать (‘НОД=’, X);

REPEAT

IF X> Y

THEN X:=X-Y

ELSE Y:=Y-X

UNTIL X=Y;

WRITE (‘НОД=’, X);

REPEAT – повторять

UNTIL – до

Пример 1.6: Вычислить факториал числа (n!=1×2×3×…×n).

F:=1;

Для K:=1 до N делать

F:=F*K;

Писать (‘n!=’, F);

F :=1;

FOR K:=1 TO N DO

F:=F*K;

WRITELN (‘n!=’, F);

FOR – для

TO – до

DO – делать

Цикл с параметром