RosettaCodeData/Task/Loops-For/BCPL/loops-for.bcpl
2023-07-01 13:44:08 -04:00

7 lines
111 B
Text

get "libhdr"
let start() be
for i = 1 to 5
$( for j = 1 to i do wrch('**')
wrch('*N')
$)