Обобщение по целому типу данных

Целые числа – это числа без десятичной точки в диапазоне от –32768 до 32767.

Описание целых переменных:

Х: Integer;

Две операции деления:

DIV – целочисленное деление

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

Примеры результата выполнения операций деления:

9 DIV 2 результат 4

9 MOD 2 результат 1

Задания к § 8

1. Вычислите значения выражений или найдите ошибки:

a) 20 div 6

b) 20 div 4

c) 2 div 5

d) 123 div 0

e) 20 mod 6

f) 20 mod 4

g) 2 mod 5

h) 3.0 mod 3

Простая программа. Команда Writeln

Простая программа на языке Pascal состоит из двух частей.

Первая часть – описание переменных. Оно начинается со слова Var. И выглядит примерно так:

Var

X,У: Integer;

A,В,С: Real;

Z: Integer;

В этой части указываются все переменные, которые будут использоваться в программе и тип, к которому они относятся. Обратите внимание на оформление: имена переменных отделяются друг от друга запятыми, перед типом, к которому они относятся, ставится двоеточие, а после него - точка с запятой.

Вторая часть - исполняемая часть программы. Она начинается со слова Begin и заканчивается словом End. (End с точкой!)

Запишем теперь первый вариант нашей программы

Var

X,У: Integer;

A,В,С: Real;

Z: Integer;

Begin

X:=5;

Y:=9;

Z:=(X+Y)*(X-Y);

A:=15;

B:=5;

C:=A/B;

End.

Результат вычисления произведения суммы двух целых величин Х и У на их разность будет присвоен переменной Z, а частное от деления вещественной величины A на B и будет присвоено переменной С.

Чтобы увидеть результат на экране компьютера нам понадобится команда вывода результата. Она начинается со слова Writeln, а после него, в круглых скобках, перечисляются имена переменных, значения которых нужно сообщить в ходе выполнения программы.

Предположим, что нас интересует только значение Z. Тогда после вычисления Z нужно написать такую команду:

Writeln(Z);

Если нас интересует кроме Z еще и С, то после вычисления С можно написать

Writeln(С);

Или сделать так:

Writeln(Z,C);

Теперь готовы два варианта программы

Var X,У: Integer; A,В,С: Real; Z: Integer; Begin X:=5; Y:=9; Z:=(X+Y)*(X-Y); Writeln(Z); A:=15; B:=5; C:=A/B; Writeln(C); End.

Var X,У: Integer; A,В,С: Real; Z: Integer; Begin X:=5; Y:=9; Z:=(X+Y)*(X-Y); A:=15; B:=5; C:=A/B; Writeln(Z,C); End.