Komentar

Jumat, 05 Juli 2013

Break, Continue, Exit

Posted by M Habibie 19.49, under | No comments





var
 
 n: integer;
 i: integer;
 



begin
 readln(n);
  
 for i:=1 to do
 
  begin
   if (i = 93then
    begin
     writeln('ERROR');
     break;
    end;
 
   if (i mod 10 0then
    continue;
  
   writeln(i);
  end;
 
end.

0 komentar:

Posting Komentar

Your Ip Address

Your IP Address

IP

Popular Post

Popular Posts