Правила форума
Break.PASЯзык:
Русский
English
{ Пример программы для процедуры Break }
uses Crt;
var
S : String;
begin
while True do
begin
ReadLn(S);
if S = '' then
Break;
WriteLn(S);
end;
end.
var
S : String;
begin
while True do
begin
ReadLn(S);
if S = '' then
Break;
WriteLn(S);
end;
end.
::
::
::
