Какое значение будет храниться в поле a записи r1 - Ответ на вопрос по информатике №1252387

Вопрос

Какое значение будет храниться в поле a записи r1 после выполнения следующего блока? var a: integer; r1: record a: byte; ... end; r2: record a: shortint; ... end;begin a:= 0; with r1 do begin r2.a:= -10; with r2 do begin a:= 100; r1.a:= -a; end end; a:= 100;end.

• 246
• -10
• 10
• 156
• 100
• 0
• -100

Ответ