Visual Basic .NET <-> Free Pascal | Podmienený príkaz

Visual Basic .NET

if then end if, if then else end if

Popis

if condition then
statements1
end if
if condition then
statements1
else
statements2
end if
Použitá kľúčové slová: if else then end

Vstup

Príklady

Visual Basic .NET

Možné požitie Podmienený príkaz:
if i > 10 then
i =10
            i = i - 1
   i=i+1
end if
if i < 10 then
 i = 10
 else
 i=1
end if
.
Free Pascal

if then, if then else

Popis

if condition then statement1;
if condition then statement1 else statement2;
Použitá kľúčové slová: if else then

Vstup

Príklady

Free Pascal

Možné požitie Podmienený príkaz:
if i > 10 then
begin
i :=10;            i := i - 1;   inc(i);
end;
if i < 10 then i := 10 else i:=1;
V iných jazykoch: en hu cz sk