- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
{$APPTYPE CONSOLE}
Procedure G(p: pointer);
Const
Messages: array[false..true] of string = ('Не гниль', 'Гниль');
Begin
Writeln(Messages[p=nil])
End;
Begin
G(nil)
End.
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 1
−3
{$APPTYPE CONSOLE}
Procedure G(p: pointer);
Const
Messages: array[false..true] of string = ('Не гниль', 'Гниль');
Begin
Writeln(Messages[p=nil])
End;
Begin
G(nil)
End.
https://ideone.com/XWhPQf