Question

В четырехразрядном натуральном числе найти сумму разрядов (кумир или паскаль написать программу полностью)

Answer 1

var a, b :integer;beginreadln(a);b:=(a mod 10);a:=(a div 10);b:=b + (a mod 10);a:=(a div 10);b:=b + (a mod 10);a:=(a div 10);b:=b + (a mod 10);a:=(a div 10);writeln(b);end.

Answer 2

круто, спасибо огромное. благодаря тебе завтра не получу двойку

Answer 3

Я стараюсь;)

Answer 4

Сейчас 3 напишу

Answer 5

Сорян, мне в магаз:) Помог, чем смог:)

Answer 6

ну ладно, все равно спасибо