perechi_.pas

来自「This ar the basic programs that i did in」· PAS 代码 · 共 10 行

program perechi;
var x,y,a,b,i :integer;
begin
write('x=');readln(x);
write('y=');readln(y);
for a:=0 to 9 do
    for b:=0 to 9 do
                    if( x+y+a+b)mod 9 =0 then writeln(a,' ',b);
end.