Question

постоите квадрат со стороной 10 из точек используя оператор for

Answer 1

program ideone;
var i,j : integer;
begin 
for i:=1 to 10 do 
begin   
for j:=1 to 10 do       
write('*'); 
writeln(' '); 
end; 
readln;
end.

Answer 2

спасибос