Mail

В этот день много лет назад...
16 апреля. В 1954 году (71 год назад) - Первые автомобильные гонки (stock-car race) проводятся в Великобритании, на участке Old Kent Road в Лондоне.

Turbo Pascal Documentation

Функция ParamCount

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

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