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