Вычислить сумму 4 целых чисел(любых) и вывести развернутое сообщение о проведеной операции.

2

Ответы и объяснения

Лучший Ответ!
2014-02-25T00:42:14+04:00
VAR  
   a,b,c,d: LongInt;
BEGIN  
   Read(a,b,c,d); 
   Write(a,'+',b,'+',c,'+',d,'=',a+b+c+d);
END.
2014-02-25T00:46:00+04:00
VAR  
   a,b,c,d: LongInt;
BEGIN  
   Read(a,b,c,d);     
   Write('Сумма введенных чисел равна ',a+b+c+d);
END.