Belajar Programming Pascal
Mari berbagi ilmu pengetahuan
Kotak Pencarian
Sabtu, 15 Oktober 2011
Pembahasan Soal Latihan TOKI Learning Center
Bab 1 : Pengenalan/ 1C : Perulangan
Break, Continue, Exit
Link Soal
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
Posting Lebih Baru
Posting Lama
Beranda
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar