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

Var s k integer begin s 1