Есть ответ 👍

1. дано натуральное число. верно ли, что сумма его цифр есть четное число, а само число не превышает b? 2. дано натуральное число. верно ли, что сумма его цифр больше m а само число делится на n?

299
355
Посмотреть ответы 2

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


Программа для 1. var   n,b,s: integer; begin   write('введите натуральное число и значение b: ');   read(n,b);   if n> b then writeln('неверно')   else begin       s: =0;       while n> 0 do begin           s: =s+n mod 10;           n: =n div 10       end;       if s mod 2=0 then writeln('верно') else writeln('неверно')   end end. программа для 2. var   k,m,n,b,s: integer; begin   write('введите натуральное число и значения m,n: ');   read(k,m,n);   if k mod n < > 0 then writeln('неверно')   else begin       s: =0;       while k> 0 do begin           s: =s+k mod 10;           k: =k div 10       end;       if s> m then writeln('верно') else writeln('неверно')   end end.

Ячуть-чуть набросаю, а дальше сама.. в современном мире вряд ли найдется тот, кто не знаком с компьютером. каждый день мы пользуемся информационными технологиями, что бы добыть, сохранить или обработать информацию. моя семья не исключение. новшества современного мира давно вошли в нашу (можешь написать про использование интернета для в выполнении , для общения и т.д.)

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