Afiseaza tabla inmultiri:
program tabla_inmultiri;
var a,b:integer;
begin
for a:=1 to 10 do
begin
for b:=1 to 10 do
write(a:2,’*',b:2,’=',a*b:2);
writeln ;
readln;
end;
end.
program tabla_inmultiri;
var a,b:integer;
begin
for a:=1 to 10 do
begin
for b:=1 to 10 do
write(a:2,’*',b:2,’=',a*b:2);
writeln ;
readln;
end;
end.
