program druk_iter; { Wczytuje liczby w i k. A następnie drujuje w-wierszy, w każdym po k-znaków '*'} var w, k, ind_w, ind_k : integer; begin write('Liczba kolumn:'); read(k); write('Liczba wierszy:'); read(w); for ind_w := 1 to w do begin for ind_k := 1 to k do write('*'); writeln end; end.