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

Var s k integer begin s 0