Информатика, опубликовано 2018-08-22 20:01:08 by Гость
В четырехразрядном натуральном числе найти сумму разрядов (кумир или паскаль написать программу полностью)
Ответ оставил Гость
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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.