You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
17 lines
305 B
17 lines
305 B
program toto;
|
|
var i : integer;
|
|
k,variablelongue : integer;
|
|
begin
|
|
i:=20;
|
|
variablelongue:=-10;
|
|
k:=i+2*3+4;
|
|
variablelongue:=pow(2,3);
|
|
if (NOT (1>2)) then i:=20;
|
|
|
|
while (i> 10) do
|
|
begin
|
|
printf('i = %d\n', i+3);
|
|
if (i=2) then puts('i=2');
|
|
i:=i-1;
|
|
end;
|
|
end.
|
|
|