Постоите квадрат со стороной 10 из точек используя оператор for
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.
спасибос