Пожалуйста помогите! Информатика! Вычислите в паскале: S=(a+b+c) *k. Я тут сижу ломаю голову уже где-то 1 час... Помогите пожалуйста! Буду благодарен! ​

var a,b,c,k,s:real;

begin

writeln('Введите a');

read(a);

writeln('Введите b');

read(b);

writeln('Введите c');

read(c);

writeln('Введите k');

read(k);

s:=(a+b+c)*k;

writeln('s = ', s);

end.