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

Question

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

ggez2 · Answer

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...