http://golf.shinh.org/p.rb?delete+blank+lines#Ada Dさんは96バイト。今見たら77まで縮んでます何事でしょうか。 私は↓で102バイト。 with text_io;use text_io;procedure a is s:string:=get_line;begin if s>""then put_line(s);end if;a;end; これ以上…