Нужна составьте блок схемуprogram n_18; varn,sum,q: integer; beginwrite (' n = '); readln (n); writeln; q: = 0; sum: =0while n> 0 dobegininc (q); sum: = sum + n mod 10n: = n div 10end.writeln ('количество цифр: ' , q); writeln (' сумма цифр: 'sum); end.

Зефирка1907    1   26.04.2019 08:12    1