От Max Popenker Ответить на сообщение
К All Ответить по почте
Дата 28.12.2001 16:09:54 Найти в дереве
Рубрики Современность; Локальные конфликты; Версия для печати

Попрограммируем? (не совсем оффтопик :)

Hell'o

Итак, набольшая программка на ABAP (ну, почти на АБАП :). Другим предлагаю написать аналог на других языках.

*****************

Report Enduring_Freedom.
read table AFGHANISTAN
with key Al-Quaeda Taleban
Bin Laden Search.

If sy-subrc = 0. " bin laden found!
perform Bombing.
perform SEAL_insertion.
Read Table Bodies_recovered
Bin Laden Search.
If sy-subrc = 0. " body found
Perform VICTORY.
Leave AFGHANISTAN.
EndIf.
Else.
Perform More_Bombing
using BLU-82
changing Landscape.
EndIf.
EndDo.

EndDo.

EndReport.

**********************

WBR, Max http://world.guns.ru - Современное стрелковое оружие