Question

ОЧЕНЬ СРОЧНО 50 балов Составьте блок схему к задаче Дано целое число N (>0) используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр (N=63) Program n_18; var n,sum,Q: integer; begin write (' n = '); readln (n); writeln; Q:= 0; sum:=0; while n>0 do begin inc (Q); sum:= sum + N mod 10; N:= N div 10; end; writeln ('количество цифр: ' , Q); writeln (' сумма цифр: 'sum); end.

Answer 1

n=get()

k=0

s=0

while n>=1 do

   s=s+n % 10

   k=k+1

   n=(n-n%10)/10

end

print(s,k)

Answer 2

Конечно! Вот блок-схема для данной программы:

luaCopy code
+---------------------+
|  Начало программы   |
+---------------------+
            |
            V
+---------------------+
|   Ввод числа N      |
+---------------------+
            |
            V
+---------------------+
| Инициализация счетчиков Q и sum |
+---------------------+
            |
            V
+---------------------+
|   Цикл while (n > 0) |
+---------------------+
            |
            V
+---------------------+
|   Увеличение Q на 1  |
|   Вычисление остатка |
|   Вычисление целой   |
|    части деления     |
|     числа на 10     |
+---------------------+
            |
            V
+---------------------+
|     Вывод Q         |
|     Вывод sum       |
+---------------------+
            |
            V
+---------------------+
|  Конец программы    |
+---------------------+

Надеюсь, эта блок-схема поможет вам лучше понять структуру данной программы и решение задачи.