Что будет выведено на экран в результате выполнения программы:

var sb: set of byte;
i,sm1,sm2: integer;
begin
sb:=

; sm1:=0; sm2:=sm1;
for i:= 2 to 9 do
if \(\(⟨0⟩ \+ ⟨2⟩\) >= sb) then
begin inc\(sm1\); sb:=sb +; end;
for i:=1 to 10 do if i in sb then inc\(sm2\);
write\(sm1:4,sm2:4\); readln;
end.

• 6 7
• 6 6
• 7 7
• 8 7
• 7 6
• Программа вызовет ошибку при компиляции
• Программа вызовет ошибку при выполнении