RosettaCodeData/Task/Loops-For/BCPL/loops-for.bcpl

8 lines
111 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
get "libhdr"
let start() be
for i = 1 to 5
$( for j = 1 to i do wrch('**')
wrch('*N')
$)