Вопрос №595579 (тип: c) в первой строке вводится натуральное чило n во второй строке вводится число b вывести на экран - слово yes, если само число и сумма его цифр кратны числу b - в противном случае вывести слово no пример входных и выходных данных № теста входные данные выходные данные 1 45545 5 no 2 555 5 yes ответ: прикрепите файл с программой в формате cpp, pas, cs, fs или java. ваш ответ будет проверен автоматически.
var n,b,sum: longint;
procedure sumdig(var x: longint );
begin
sum:=0;
while ( x<>0 ) do
begin
sum := sum + (x mod 10);
x := x div 10;
end;
end;
begin
readln(n);
readln(b);
sumdig(n);
if (n mod b=0) and (sum mod b=0) then writeln('yes') else writeln('no');
end.