Break.PAS

Language:
Русский
English

     {Break.PAS}
    ▀▀▀▀▀▀▀▀▀▀▀▀▀
  {Sample code for the Break procedure.}

  uses WinCrt;
  var
    S: String;
  begin
    while True do
    begin
      ReadLn(S);
      if S = '' then Break;
      WriteLn(S);
    end;
  end

Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //