В десятичной записи числа 42*4* две цифры пропущены.
Восстановите пропущенные цифры, если известно, что число кратно 72.
Паскаль, через вложенные циклы.
Восстановите пропущенные цифры, если известно, что число кратно 72.
Паскаль, через вложенные циклы.
More Questions From This User See All
Answers & Comments
Verified answer
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
Verified answer
Vari, 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.