Program 1 pascal (41/48)

Program 1 pascal