Презентация на тему Программирование на языке Паскаль

на экран наибольшее из них.
Идея решения: надо вывести на

Алгоритмы, в которых последовательность шагов зависит от выполнения некоторых условий, называются разветвляющимися.

условного оператора
program qq;
var a, b, max: integer;
begin
writeln('Введите

если условие верно}
end
else begin

Особенности:
перед else НЕ ставится точка с запятой
вторая часть (else …) может отсутствовать (неполная форма)
если в блоке один оператор, можно убрать слова begin и end

a := b;
end
else
b

if a > b then begin
a := b;
else begin
b := a;
end;

if a > b then begin
a := b;
end;
else begin
b := a;
end;

if a > b then begin
a := b;
end
else b > a begin
b := a;
end;

begin

end

begin

end

writeln('Введите два целых числа');
read ( a,

неполная форма условного оператора

writeln('Введите два целых числа');
read ( a,

max := a;

a > b

a := b;
else b :=

if a > b then begin
a := b;
end;
else b := a;

if a > b then
else begin
b := a;
end;

if a > b then
a := b;
else b := a; end;

a := b

end

a := b

if b >= a then
b := a;