Var s k integer begin s 0 (25/48)

Var s k integer begin s 0