Найти все трехзначные числа у которых сумма цифр равна а , а само число делится на в. паскаль. 40 .

Flexx1337 Flexx1337    1   01.10.2019 16:30    2

Ответы
nastuastar12 nastuastar12  04.08.2020 22:29

program test;

var i,a,b:integer;

BEGIN

writeln('Enter a:');

readln(a);

writeln('Enter b:');

readln(b);

for i:=100 to 999 do

   begin

   if i div 10) mod 10)+(i div 100)+(i mod 10) )= a) and (i mod b=0)  then writeln(i);

   end;

END.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика