Перепишите программу на Паскале, для вычисления суммы 10 вводимых с клавиатуры целых чисел, исправив ошибки: Program summa Var k, а: real; sum: integer; Begin For i:=-10 to 10 Do Read (a); S:=S +1; Write (‘S=’ S) End. Сколько найдено ошибок? _________________