Berikutadalah source code programnya dengan bahasa pemrograman Matlab. x = input('Masukkan nilai : '); nilai = mod(x,2); if nilai==0 for i = 1:5 ('Nilai adalah bilangan Genap') end else for i=1:5 ('Nilai adalah bilangan Ganjil') end end Sedangkan dengan bahasa pemrograman Pascal adalah sebagai berikut: Program bilganjil; uses crt; var j : integer; begin Home » Pascal » Pascal Program Menentukan Deret Aritmatika Bilangan Bilangan Ganjil 6286 Views June 20, 2014 122 pm Published by No comment Menentukan deret aritmatika pada deret bilangan ganjil adalah salah satu implementasi saja pada konsep Deret Aritmatik. Kali ini CMW mencoba untuk membuat programnya dalam bahasa pemograman Pascal. Rumus Deret Aritmatika Dalam matematika rumus deret suke ke-n atau Un ditulis sbb Un=a+n-1b Un = suku ke-n a = deret pertama/suku ke-1 b = beda atau selisih suku b=U2-U1 n = 1, 2, 3, dst Listing Program Pascal Deret Bilangan Ganjil program cari_deret; uses crt; var Un, a, b, n integer; begin a=1; b=2; n=3; Un=a+n-1*b; writelnUn; readln; end. iCF8J.