var i:integer; begin for i:=10 to 99 do begin if ((i div 10)+(i mod 10)) mod 8 = 0 then writeln (i); end; readln end.
Яндекс