Найдите сумму цифр введённого 4-х значного числа С ОБЬЯСНЕНИЕМ!!
Паскаль

zaret1 zaret1    3   20.05.2021 09:03    0

Ответы
1MrFeNiKS1 1MrFeNiKS1  20.05.2021 09:10

Var s,n:integer;

Begin

   write('4-х значное число: ');readln(n);

   s:=(n mod 10)+(n div 10 mod 10)+(n div 100 mod 10)+n div 1000;

   writeln('S = ',s);

   readln;

End.

Объяснение:

Через Pascal

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика