次のプログラムはなんと出力するでしょう。 with ada.text_io; with ada.integer_text_io; procedure a is k : boolean := true; type t is record x : integer; end record; function z return t is x : integer := 10; begin if k then k := false; ada.in…