perechi_.pas

This ar the basic programs that i did in highschool. From very simple to medium programs. From array

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.