Kali ini saya akan membagikan cara untuk membuat deret bilangan ganjil dengan menggunakan bahasa pemrograman pascal. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.
berikut source code nya :
program bilanganganjil;
uses crt;
var
i,n:integer;
begin
clrscr;
writeln('masukan batas akhir');
readln(n);
for i:=1 to n do
if (i mod 2 = 1) then
write(i,' ');
end.
berikut screenshoot nya :
0 komentar:
Posting Komentar