一个自然数 除以7余数是5 除以9余数是3 除以11余数是4 问这个数最小是几 (列出计算过程)var i:Integer; begin memo1.Lines.Clear; for i:=1 to 1000000 do if (i mod 7=5) and (i mod 9=3) and (i mod 11=4) then memo1.Lines.Ap

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/04 18:50:19
一个自然数 除以7余数是5 除以9余数是3 除以11余数是4 问这个数最小是几 (列出计算过程)var i:Integer; begin memo1.Lines.Clear; for i:=1 to 1000000 do if (i mod 7=5) and (i mod 9=3) and (i mod 11=4) then memo1.Lines.Ap

一个自然数 除以7余数是5 除以9余数是3 除以11余数是4 问这个数最小是几 (列出计算过程)var i:Integer; begin memo1.Lines.Clear; for i:=1 to 1000000 do if (i mod 7=5) and (i mod 9=3) and (i mod 11=4) then memo1.Lines.Ap
一个自然数 除以7余数是5 除以9余数是3 除以11余数是4 问这个数最小是几 (列出计算过程)
var i:Integer;
begin
memo1.Lines.Clear;
for i:=1 to 1000000 do
if (i mod 7=5) and (i mod 9=3) and (i mod 11=4) then
memo1.Lines.Append(IntToStr(i));
end;
end.
懂编程的可以用这个公式算算

一个自然数 除以7余数是5 除以9余数是3 除以11余数是4 问这个数最小是几 (列出计算过程)var i:Integer; begin memo1.Lines.Clear; for i:=1 to 1000000 do if (i mod 7=5) and (i mod 9=3) and (i mod 11=4) then memo1.Lines.Ap
7+5=12 12除以7余数是5 除以9余数是3
12+63n=(11+55n)+(8n-3)+4
8n-3是11倍数
8n-3=11k
n最小是10
这个数最小是12+63*10=12+630=642

Option Explicit
Private Sub Command1_Click()
Dim i%
For i = 1 To 1000
If (i Mod 7 = 5) And (i Mod 9 = 3) And (i Mod 11 = 4) Then Exit For
Next i
Print i
End Sub

一个自然数除以11时,商和余数相等;除以9时,商是余数的三倍,求这个自然数? 三个连续自然数的两位数,除以5的余数之和是7,除以7的余数之和是9,除以9的余数之和是15,则这三数除以13的余数是多少? 一个自然数,除以19余数为9,除以23余数为7,这个自然数最小是多少? 一个大于一的自然数,300除以它余数是A,245除以它余数是A+2,210除以它余数是A+5 这个数是多少, 有一个数除以3余数是2 除以5余数是2 除以7余数是4 这个自然数最小是几 两个自然数除以17后的余数是5和7,那么他们的积除以17的余数是 有一个数除以3余数是2,除以5余数是4,除以7余数是6,除以9余数是8,除以11刚好没有余数,这个数是? 一个三位数除以6的余数是4,除以8的余数是6,除以9的余数是7,这样的三位数最小是几?明天要交啦 一个数除以3,余数是2,除以5,余数是4,除以7余数是6 有一个在200到300间的整数,除以3余数是1,除以5余数是2,除以7余数是3,问它是多少? 有一个自然数,除以3的余数是2,除以4的余数是1,则这个数除以12的余数是? 有一个自然数“X”,除以3的余数是2,除以4的余数是3,问“X”除以12的余数是多少 ,答案是11, 一个自然数除以11时所得到的商和余数是相等的除以9时所得到的商是余数的三倍,这个自然数是多少 一个自然数,除以11所得到的商和余数是相等的,除以9时所得到的商是余数的3倍,这个自然数是多少? 多少除以6余数是3,除以8余数是7,除以7余数是4,除以9余数是3? 有一个数,除以5余数是3,除以7余数是2,这个数除以35的余数是多少? 一个数除以5余数是3,除以7余数是2,这个数除以35余数是多少. 有一个数,除以5余数是3,除以7余数是2,这个数除以35的余数是多少