最好的脑科医生:PASCAL 试编程找出能被各位数字之和整除的一切两位数。

来源：百度文库 编辑：杭州交通信息网 时间：2024/04/30 19:41:21

var
x, y: byte;
begin
for x := 1 to 9 do
begin
for y := 0 to 9 do
begin
if (x*10+y) mod (x+y) =0 then
writeln(x,y)
end;
end;
end;

var
i, j: integer;
begin
for i := 1 to 9 do
begin
for j := 0 to 9 do
begin
if (i*10+j) mod (i+j) =0 then
write(i,j,' ')
end;
end;
end.

PASCAL 试编程找出能被各位数字之和整除的一切两位数。 如何证明各位数字之和能被3整除则这个数就能被3整除 C语言外围数字之和编程 输入一个正整数,求各位数字之和 找出幸运数对是指差是3,且每个数的各位数的数字之和都能被6整除的一对数. pascal编程哥德巴赫猜想将一个奇数拆分成三个素数之和 编程PASCAL pascal编程 pascal编程： Pascal编程