Jumat, 12 Oktober 2012
Kamis, 05 Januari 2012
Posts by : Admin
Program Rata - Rata
program rata;
uses wincrt;
var i, n: integer;
x, sum, mean: real;
begin
writeln ('banyaknya data= ');
readln (n);
for i:=1 to n do
uses wincrt;
var i, n: integer;
x, sum, mean: real;
begin
writeln ('banyaknya data= ');
readln (n);
for i:=1 to n do
Posts by : Admin
Program Bintang
Posts by : Admin
Program Segitiga Pascal (II)
Posts by : Admin
Program Segitiga Pascal (I)
Langganan:
Postingan (Atom)