Jannah Theme License is not validated, Go to the theme options page to validate the license, You need a single license for each domain name.
PascalPemrograman

FizzBuzz Pascal #182

Compact disc itu berbentuk lingkaran dengan lubang ditengah

andrypein.net : Fizzbuzz adalah algoritma random, algoritmanya bisa dilihat baris yang aing quote, sekarang kita coba fizzbuzz pascal.

Quotes :

dari 1 sampai seratus
setiap kelipatan 3 cetak fizz
setiap kelipatan 5 cetak buzz
setiap kelipatan 3 dan lima cetak fizzbuzz
sisanya cetak angka

Penampakan aplikasi fizzbuzz pascal akan jelas panjang karena pengulangannya sampai 100.
fizzbuzz pascal
LMAO panjang

Bisa ko tinggal ganti saja 100 nya dikurangin lah.

var
 nomor : integer;
begin
 for nomor:=1 to 100 do
  begin
   if (nomor mod 3 = 0) and (nomor mod 5 =0) then
    writeln('Fizzbuzz')
   else if (nomor mod 3 = 0) then
    writeln('Fizz')
   else if (nomor mod 5 = 0) then
    writeln('Buzz')
   else
    writeln(nomor);
  end;
end.

IdeOne Src

*AFK

Related Articles

Tinggalkan Balasan

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *

Back to top button