найти сумму 4 чисел паскаль

Спасибо

vara,b,c,d, sum: integer;beginwrite('Введите через пробел 4 числа: ');readln(a,b,c,d);sum:=a+b+c+d;writeln('Сумма: ',sum);end.