Что будет выведено на экран в результате выполнения программы: var sc, s1, s2: set of char; i,sm1,sm2: integer; begin sc:= ['a'..'f','A']; s1:=sc + ['1'..'8']; s2:= s1 - ['F'..'a']; s1:= s2*['a','b','3'..'6']; sm1:=0; sm2:=sm1; for i:= 32 to 127 do if char(i) in sc then inc(sm1) else if char(i) in s1 then inc(sm2); write(sm1:4,sm2:4); readln; end. 7 4 7,4 7 6 6 4 6 0 Программа вызовет ошибку при компиляции Программа вызовет ошибку при выполнении
Логотип SimpleЦДЗ

Похожие

Задание

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

var sc, s1, s2: set of char;
i,sm1,sm2: integer;
begin
sc:=

\['a'\.\.'f','A'\]
; s1:=sc +
\['1'\.\.'8'\]
;
s2:= s1 -
\['F'\.\.'a'\]
;
s1:= s2*
\['a','b','3'\.\.'6'\]
; sm1:=0;
sm2:=sm1; for i:= 32 to 127 do
if char\(i\) in sc then inc\(sm1\) else
if char\(i\) in s1 then inc\(sm2\);
write\(sm1:4,sm2:4\); readln;
end.

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

Тот же тест