В десятичной записи числа 424 две цифры пропущены.

Восстановите пропущенные цифры, если известно, что число кратно 72.

Паскаль, через вложенные циклы.

Question

Информатика

Гурий

7 июня, 11:10

В десятичной записи числа 424 две цифры пропущены.

Восстановите пропущенные цифры, если известно, что число кратно 72.

Паскаль, через вложенные циклы.

+5

Ответы (2)

Знаешь ответ?

Емилиана · Answer 1

Var

i, j, s: longint;

begin

for i : = 0 to 9 do

for j : = 0 to 9 do

begin

s : = (42040 + i * 100 + j);

if (s mod 72 = 0) then writeln (s, ' ', i, ' ', j);

end;

end.

Иваня · Answer 2

Var i, j:integer;

begin

for i:=0 to 9 do

for j:=0 to 9 do

if (42000+i*100+40+j) mod 72 = 0

then writeln (42000+i*100+40+j);

end.

Результат:

42048

42840

В десятичной записи числа 42*4 * две цифры пропущены.Восстановите пропущенные цифры, если известно, что число кратно 72.Паскаль, через вложенные циклы.

В десятичной записи числа 424 две цифры пропущены.

Восстановите пропущенные цифры, если известно, что число кратно 72.

Паскаль, через вложенные циклы.