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

Ответ:
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
Добавить ответ

УЗНАВАЙ
БОЛЬШЕ НА
школьникам!
У тебя проблема с домашними заданиями? Попроси о помощи!
- 80% ответов приходят в течение 10 минут;
- Мы не только ответим, но и объясним;
- Качество гарантируется нашими экспертами.
Самые новые вопросы