Презентация на тему Основы программирования:язык pascal

типы;
var переменные;
подпрограммы
оператор;
оператор;
…
оператор
begin
end.

помечаются операторы программы, к которым можно перейти оператором goto.
Пример:
program

= значение;…
Константа – именованный объект программы, имеющий неизменное значение.
Пример:
program

= ОпределениеТипа2;…
Тип описывает структуру данных, определяется множеством значений, операциями

Тип1;
Имя3, Имя4, … : Тип2;
Переменная – именованный объект

операторы;
end;
Подпрограмма – именованный относительно независимый блок программы, который можно

операторы; {в т.ч. ИмяФункции := возвр.значение}
end;
Функция – подпрограмма, возвращающая

программа.

Операторы бывают:
Операторы действия (:=, read, write)
Операторы управления (if, case,

должен соответствовать типу выражения !
Порядок исполнения:
Вычисление выражения
Приведение типа (если

типы (напр.: integer:=byte) – от меньшего к большему
неявно приводимые

i: integer;
b: byte;
r : real;
d

с консоли (клавиатуры) ввода значений переменных
Типы значений должны соответствовать

выводит на консоль (дисплей) значения выражений скалярного типа
writeln еще

x : real;
begin
writeln(‘Введите два целых числа:’);
readln(a, b);

из последовательности нескольких операторов одного – составного оператора (блока)

оператор2];

Исполняется оператор1, если условие истинно, в противном случае –

условие

оператор1

оператор2

оператор2;
оператор3;
end;
условие
оператор1
условие
оператор1
оператор2
оператор3

0 then
writeln(‘Первая четверть’)
else
writeln(‘Четвертая четверть’)
else
if y > 0 then
writeln(‘Вторая четверть’)
else
writeln(‘Третья

: оператор1;
зн5, зн6,… : оператор2;
…
[else операторN;]
end;

Проверяются последовательно значения, при

: writeln(‘ Зима!’);
3, 4, 5 : writeln(‘Весна!’);
6, 7, 8

to кз do
оператор; {тело цикла}

параметр – переменная порядкового типа
нз

n do
begin
p := p * n;
s := s

n do
begin
s := s + i;
if n mod

for j := 1 to i do
s := s

условие do
оператор; {тело цикла}


Пока условие истинно, исполняется тело

в}

readln(a, b);
p := a;
while p < b do
begin
writeln(p);
p :=

0;
while N 0 do
begin
s := s + N

0;
while N 0 do
begin
d := N mod 10;
if

N 1 do
begin
while N mod p = 0

{ тело цикла}
оператор2;
…
until условие;


Пока условие ложно, исполняется тело цикла
Если

квадрат, больший N}

readln(N);

p:=1;
repeat
p := p + 1
until sqr(p) >

присоединения имени поля к имени записи