1. Как на языке Паскаль записывается полное и неполное ветвление?
Ответ
На языке Паскаль полное ветвление осуществляется с помощью оператора if-then-else, а неполное ветвление — с помощью оператора if-then.
Пример полного ветвления:
program FullBranching;
var
num: integer;
begin
write(‘Введите число: ‘);
readln(num);
if num > 0 then
writeln(‘Число положительное.’)
else if num < 0 then
writeln(‘Число отрицательное.’)
else
writeln(‘Число равно нулю.’);
readln;
end.
Пример неполного ветвления:
program IncompleteBranching;
var
num: integer;
begin
write(‘Введите число: ‘);
readln(num);
if num > 0 then
writeln(‘Число положительное.’);
readln;
end.
Обратите внимание, что в случае полного ветвления используется оператор if-then-else, а в случае неполного ветвления — только оператор if-then.