21 lines
239 B
ObjectPascal
21 lines
239 B
ObjectPascal
program main;
|
|
|
|
function if_if_Else: integer;
|
|
var a,b: integer;
|
|
begin
|
|
a := 5;
|
|
b := 10;
|
|
if (a = 5) then
|
|
begin
|
|
if (b = 10) then
|
|
a := 25;
|
|
end
|
|
else
|
|
a := a + 15;
|
|
if_if_Else := a;
|
|
end;
|
|
|
|
begin
|
|
write(if_if_Else);
|
|
end.
|