Разработать консольную программу на VB, которая вводит числа M и N , а затем выводит на экран заполненный прямоугольник из звездочек размером M на N (M строк по N звездочек)
Answers & Comments
v1248
Sub mm() M = Cells(2, 7) N = Cells(2, 15) For i = 1 To N For J = 1 To M Cells(J + 3, i) = "'*" Next J Next i End Sub
Answers & Comments
M = Cells(2, 7)
N = Cells(2, 15)
For i = 1 To N
For J = 1 To M
Cells(J + 3, i) = "'*"
Next J
Next i
End Sub