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

11 lines
115 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
' FB 1.05.0 Win64
For i As Integer = 1 To 5
For j As Integer = 1 To i
Print "*";
Next
Print
Next
Sleep