Kotak Pencarian

Sabtu, 15 Oktober 2011

Pembahasan Soal Latihan TOKI Learning Center

Bab 1 : Pengenalan/ 1C : Perulangan

Break, Continue, Exit

PROGRAM BCE;
VAR
n,i : integer;

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


Tidak ada komentar:

Posting Komentar