Информатика, вопрос задал Pop3 , 10 лет назад

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

Ответы на вопрос

Ответил JustPeople
0
VAR  
   a,b,c,d: LongInt;
BEGIN  
   Read(a,b,c,d); 
   Write(a,'+',b,'+',c,'+',d,'=',a+b+c+d);
END.
Ответил Бублик007
0
VAR  
   a,b,c,d: LongInt;
BEGIN  
   Read(a,b,c,d);     
   Write('Сумма введенных чисел равна ',a+b+c+d);
END.
Новые вопросы