Сумма вводимых чисел. паскаль abc. 8 класс

Vara,b,c,summa:integer;beginWrite('Сколько чисел ');read(a);for b:=0 to a dobeginwriteln('Введите число ');Read(c);summa:=summa+c;end;writeln('Сумма  = ',summa);end.