Rabu, 10 November 2010

5. UNTUK MENAMPILKAN BILANGAN GANJIL DARI ANGKA 1 SAMPAI DENGAN ANGKA 100.

algoritmanya adalah sebagai berikut :
Bilangan ganjil dari 1 sampai 100 = 1,3,5,7,9,…………,99
Catatan : bilangan apa saja yag dimod2=1 adalah bilangan ganjil
Untuk nilai I = 1 to 100 lakukan
Jika nilai Imod2 = 1 maka
Cetak nilai


Untuk programnya dalam bahasa pascal adalah :

uses crt;
var I: integer;
begin
clrscr;
for I:= 1 to 100 do
begin
if I mod 2= 1 then
write(I:5);
end;
Readln;
end.

Tidak ada komentar:

Posting Komentar