TOPIC
kkkk como assim?
jcaique asked 2 years ago
program sequencia;
var
i, j : Integer;
begin
for i:=1 to 9 do
begin
for j := 7 downto 5 do
begin
writeln('I=',i,' J=',j);
end;
end;
end.
kkkk como assim?
program sequencia;
var
i, j : Integer;
begin
for i:=1 to 9 do
begin
for j := 7 downto 5 do
begin
writeln('I=',i,' J=',j);
end;
end;
end.