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.
10 lines
163 B
10 lines
163 B
program while1;
|
|
var var1 : integer;
|
|
begin
|
|
var1 := 10;
|
|
while (var1 * 2) > 0 do
|
|
begin
|
|
var1 := var1 - 1;
|
|
printf('%d\n', var1);
|
|
end;
|
|
end.
|
|
|