Var s k integer begin s 100. Var begin end readln. var s k integer. var s k integer begin s 0 for k 1 to 6 do s s+15. write (беркут') write (ястреб ')end begin nx integer.