Program 1 pascal (4/48)

Program 1 pascal