Алгоритми з розгалуженнями

else

begin

floattostr

if

end

спеціальні

змішані

повні

неповні

класичні

then...else

begin...end

if...then

until...repeat

var

and

if

else

end

then

якщо A<5 тоді A = A-1 інакше A = A+1;

якщо A<5 тоді A = A+1;

якщо A<5 тоді A = A+1 інакше A = A-1;

якщо A<5 тоді A = A-1;

розгалуження

повторення

слідування

інша відповідь

if <умова> then <серія команд 1> else <серія команд 2>;

if <умова> then <серія команд>;

if <умова> else <серія команд 1> then <серія команд 2>;

then <умова> if <серія команд 1> else <серія команд 2>;

a:=strtofloat(Edit1.text);

b:=strtofloat(Edit1.text);

x:=a-3*b;

if x=0

then label1.caption:=’Вираз значення не має: ділення на 0’

Else begin;

y:=a+2*b;

z:=y/x;

label1.caption:=floattostr(z);

end;

a:=strtofloat(Edit1.text);

s:=a;

n:=1;

while s<=100 do

begin

a:=a+3;

s:=s+a;

n:=n+1;

end:

label1.caption:=inttostr(n);

end;

k:=1;

a:=12;

while a<100 do

begin

a:=2*a-4;

k:=k+1;

end;

s:=0;

a:=1;

k:=1;

while a<50 do

begin

s:=s+a;

k:=k+1;

a:=k*k;

end;

Для того, щоб у ході виконання проекту вибрати лише один з можливих варіантів.

Для того, щоб в ході виконання проекту вибрати або один з можливих варіантів, або кілька, або не вибрати жодного.

Для того, щоб перебирати дані.

перемикач

прапорець

текстове поле

напис

х>0

х<=0

х<>0

х mod 2 = 0