RosettaCodeData/Task/Loops-For/FreeBASIC/loops-for.basic

11 lines
115 B
Plaintext

' FB 1.05.0 Win64
For i As Integer = 1 To 5
For j As Integer = 1 To i
Print "*";
Next
Print
Next
Sleep