Есть ответ 👍

Составить блок-схему решения ax+b=0 при условии а≠0 b≠0​

155
444
Посмотреть ответы 1

Ответы на вопрос:

yanarem1
4,4(24 оценок)

Для натуральных чисел: var a,k,s: integer; begin write('a = '); readln(a); k: =0; s: =0; while a> 0 do   begin   k: =k+1;   s: =s+a mod 10;   a: =a div 10;   end; writeln('k = ',k,', s = ',s); end. пример: a = 352186 k = 6, s = 25

Популярно: Информатика