Правила форума
Break.PASLanguage:
Русский
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
::
::
::
