Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

#1157. Как ни суйся, не ворочай

0 views
Skip to first unread message

InternetFix

unread,
Aug 14, 2009, 5:00:14 AM8/14/09
to
� 2007 ���� � ������� � ������-��������������
��������� ��� 10�11 ������� ��� ����� �� ������
���������� �������������. ��� ������ ��������
������� �����, � �� ����������� �� �������� �������
Delphi. ���� �������, ��� ������� �������� ���
�������� ������ ���������� �������. ���������� ���
�������, ������� ������ ����� �� �������, �� ������
� ���������� ���������� Delphi, � ������� �� ��
�������������, � �������, ������� �������� �����
����� 10�20 �������������� ������.

������� ��� �������� ������� �� ������ ������
�������:

���� ����� A, B, C, D. ���� ������ ��������� A
� B �������� � ��������� C � D, �� �������
����, � ��������� ������ � ���Ԩ.


���� ����������� �����: ��������� �����, ����
������� ������� ������ ������ �����, ���
������������� �����. �� ����� ����� ������ ������
������. ��������� ��������� �������������, � ޣ�
����, � ��� ����� ���������: ������ ���� �����
������ ���������! ��������� ������������� �
��������������...

�� ���� �� ���������� ������ ���������� � ����� �
���� ����� �����. ��� ����� ���������, ��� ������
���������� � �������, � �������� ������ �
�������������. �� ��������: ���, �� ̣���� ��
������! ���, ������ ����Ԩ, � � ��������� ���
������. �������� ������� ��������� �������� ���:

if (A=...) and (B=...) and (C=...) and (D=...)
then writeLn ('��');


��� ������� �����, ������� ����� �� ���������,
�������� �������� �� �������Ũ. ����� �� ��� �����
�������� ������������?

(c) ithappens


0 new messages