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

var s1,s2,s3: set of byte;
i,sm1,sm2,sm3: integer;
begin
s1:=

; s2:=;
s3:= ; sm1:=0;{..256}
sm2:=sm1; sm3:=sm1;
for i:= 0 to 256 do { to 256}
if i in s1 then inc\(sm1\) else
if i in s2 then inc\(sm2\) else
if i in s3 then inc\(sm3\);
write \(sm1:4,sm2:4,sm3:4\); readln;
end.

• 5 3 3
• 5,3,3
• 5 3 4
• Программа вызовет ошибку при компиляции
• Программа вызовет ошибку при выполнении
• 5 3 5
• 5 4 5