Contoh Program Pascal Ganjil menggunakan FOR DO - Catatan Faiq Hisyam Marwan

Contact Form

 

Contoh Program Pascal Ganjil menggunakan FOR DO

Program for_ganjil
uses crt;
var z : integer;

begin 
clrscr;

write('Output Bilangan Ganjil : ');

x:=1;
        for x:=1 to 30 do
        if(x mod 2)=1 then
        write(x,' ');
        x:=x+1;

readln;
end.



Semoga bermanfaat. :)

Total comment

Author

Faiq Hisyam Marwan

0   comments

Cancel Reply