9 lines
85 B
Text
9 lines
85 B
Text
var i;
|
|
begin
|
|
i := 10;
|
|
while i > -1 do
|
|
begin
|
|
! i;
|
|
i := i - 1
|
|
end
|
|
end.
|