tugas 6

Program For Do

Program               For_Do;

Uses                      wincrt;

Var                         I : byte;

Begin

                                For I : = 1 to 5 Do

                                                Writeln (i);

End.

                                                                                                                          by juwita