Показать сообщение отдельно

  #5  
Старый 06.12.2007, 21:18
HalkRus
Новичок
Регистрация: 06.12.2007
Сообщений: 2
Провел на форуме:
65738

Репутация: 0
По умолчанию

Gulik, написал на Паскале. Только вот ты бы поподробнее написал что должна делать прога...
program PassChecker;
Код:
program PassChecker;
uses crt;
var
  i,Maska,StartSymbol,EndSymbol:longint;
  f:text;
begin
  assign(f,'pass.txt');
  rewrite(f);
  write('Maska='); readln(Maska);
  write('StartSymbol='); readln(StartSymbol);
  write('EndSymbol='); readln(EndSymbol);
  for i:=StartSymbol to EndSymbol do begin
    writeln(f,Maska,i);
  end;
  close(f);
end.
З.Ы. если что -стучите, помогу
 
Ответить с цитированием