Mail

В этот день много лет назад...
19 апреля. В 1903 году (121 год назад) - Кишиневский погром - один из самых кровавых еврейских погромов в царской России. Как писал Сергей Витте: "Еврейский погром в Кишеневе, устроенный попустительством Плеве, свел евреев с ума и толкнул их окончательно в революцию. Ужасная, но еще более идиотская политика!..".

Turbo Pascal Documentation

Функция ParamCount

     Функция: Возвращает число параметров,  переданных  в  в
командной строке.
     Описание: ParamCount
     Тип результата: Слово (word).
     Примечания: Разделителями служат пробелы и символы  та-
буляции.
     Прочее: См. также функцию ParamStr.
     Пример:

begin
   if ParamCount < 1 then
      Writeln('В командной строке нет параметров');
   else
      Writeln(ParamCount,' параметров');
end.