Помогите с задачей по паскалю очень надо пожалуста люди выручите.

Program Summa; Var S, A, B, C: word; Begin Write ('Введите A — > '); Readln (A); Write ('Введите B — > '); Readln (B); Write ('Введите С — > '); Readln (C); S: =A+B+C; Write (' Сумма равна ',S); ReadlnEnd.