Program 1 pascal (43/48)

Program 1 pascal