ISBN :
Возрастное ограничение : 0
Дата обновления : 12.08.2023
ifусловие3then
// здесь инструкции, которые будут выполнены,
// если условия условие1 и условие2 ложны, а условие3 истинно
else
// здесь инструкции, которые будут выполнены,
// если ни одно из условий условие1, условие2 или условие3
// НЕ выполняется
end;
end;
end;
Пример:
if n = 1 then
material :='Алюминий';
density := 2.7;
else
if n = 2 then
material :='Медь';
density := 8.9;
else
if n = 3 then
material :='Сталь';
density := 7.856;
else
material :='Пластик';
density := 1.9;
end;
end;
end;
Условие
Условие это – выражение логического типа, которое может принимать одно из двух значений: Истина или Ложь.
Различают простое и сложное условия.
Простое условие
Простое условие в общем виде записывается так:
op1 оператор_сравнения op2
Где:
op1 и op2 – сравниваемые операнды, в качестве которых могут выступать константы, переменные, функции или выражения.
Операторы сравнения:
= равно
> больше
>= больше или равно
< меньше
<= меньше или равно
!= не равно
Примеры простых условий:
a[i+1] < a[i]
d != 0
pos(' ', st) = 1
name = 'simpson'
Сложное условие
Сложное условие в общем виде записывается так:
усл1 логический_оператор усл2
Где:
усл1 и усл2 – выражения логического типа, в качестве которых могут выступать простые или сложные условия.
Логические операторы:
AND – логическое И
OR – логическое ИЛИ
NOT – логическое НЕ
Примеры сложных условий:
x >= x1 AND x <= x2
NOT((x < x1) OR (x > x2))
sum >=1000 and sum <10000
name = 'Bart' OR name = 'Homer'
Цикл for
Инструкция цикла for в общем виде записывается так:
for сч := start to finish do
// инструкции, которые надо выполнить несколько раз
end;
Где:
сч – счетчик циклов (переменная целого типа);
start и finish – выражения целого типа (в простейшем случае – целые константы), определяющие, соответственно, начальное и конечное значение счетчика циклов.
Примеры:
for i:=1 to 10 do
writeln(i:2, ' Hello, World!');
end;
for i:=1 to n do
writeln(i:2, ' Hello, World!');
end;
Все книги на сайте предоставены для ознакомления и защищены авторским правом