^^ Selamat Datang .. Suatu kehormatan bagi saya atas kunjungan anda .. saya sangat berharap kunjungan anda berikutnya, okeh - okeh jangan lupa yah ... ^^

Senin, 28 November 2011

PROGRAM GARIS

Posted by wakhidatul anikiyah 12.04, under | No comments

uses wincrt;

procedure garis;
var
x:integer;

PROGRAM HITUNG(PENJUMLAHAN)

Posted by wakhidatul anikiyah 11.57, under | 1 comment

program hitung_;
uses wincrt;
var
c:integer;
procedure hitung;

Rabu, 23 November 2011

TUGAS JARKOM II ( IP ROUTE STATIS )

Posted by wakhidatul anikiyah 13.57, under | 4 comments


Selasa, 15 November 2011

ALGORITMA : PERULANGAN I

Posted by wakhidatul anikiyah 08.26, under | 1 comment

CONTOH LATIHAN PERULANGAN for to do


program perulangan_angka;

uses wincrt;

var i : integer;

begin

    Writeln('Program Perulangan Angka 1 sampai 10');

    for i:=1 to 10 do

    writeln(i);

end.