Написать программу на паскале s= cos1 + cos2 + cos3 + ... + cos10

var sum:real; begin for var i:=1 to 10 do sum:=sum+cos(i); print ('s =', sum); end.