Program 1 pascal (7/48)

Program 1 pascal