Var i integer begin for i. Readkey в паскале. uses crt. var s k integer begin s 0 for k 3 to 7 do s s 6. var s k integer begin s 0 for k 1 to 6 do s s+15.