guns...... kalian kan ada yang di remedial sama yang belum ulangan
kayanya soalnya kaya gininih ntar......(meureunnya),
uses
wincrt;
var
luasalas,tinggi,hasil :real;
begin
writeln('---------------');
writeln('rumus segi tiga');
writeln('---------------');
write('masukan luas alas? ');
readln(luasalas);
write(('masukan tinggi? ');
readln(tinggi);
hasil:=1/2*luasalas*tinggi;
writeln(maka hasilnya adalah= ',hasil);
end.
jangan ditulis ya, tp di pahami jd kalau beda soalnya bisa ngerjainnya wokey :D
by 27
Minggu, 21 Oktober 2012
Rabu, 17 Oktober 2012
belajar pascal "1"
gunss maaf deh yang waktu itu postingnya kurang ngerti ya ya udah gini deh,
tulis di tupas(turbo paskal) kalian gini
uses
wincrt;
begin
writeln('----------');
writeln('my pascal');
writeln('----------');
writeln('nama: febrianto');
writeln('kelas: 10 rpl');
writeln('umur:15');
writeln('bidang keahlian:rekayasa perangkat lunak');
end.
ok gitu, truss udah itu "run", kalau udah berhasil komen oke di grup rpl :D
good luck :D
tulis di tupas(turbo paskal) kalian gini
uses
wincrt;
begin
writeln('----------');
writeln('my pascal');
writeln('----------');
writeln('nama: febrianto');
writeln('kelas: 10 rpl');
writeln('umur:15');
writeln('bidang keahlian:rekayasa perangkat lunak');
end.
ok gitu, truss udah itu "run", kalau udah berhasil komen oke di grup rpl :D
good luck :D
Senin, 15 Oktober 2012
BELAJAR PASCAL 1
gans katanya mau blajar pascalkan bikin dulu nih kaya gini
(isi dengan biodata kalian)
---------------
MY PASCAL
---------------
NAMA :
KELAS :
ALAMAT :
JENIS KELAMIN :
SEKOLAH :
BIDANG KEAHLIAN :
tampilannya harus kaya gini kalau udah print screen ke grup rpl ntar saya liat
(SELAMAT MENCOBA) :D
esoknya saya kasih tau yang bener
(isi dengan biodata kalian)
---------------
MY PASCAL
---------------
NAMA :
KELAS :
ALAMAT :
JENIS KELAMIN :
SEKOLAH :
BIDANG KEAHLIAN :
tampilannya harus kaya gini kalau udah print screen ke grup rpl ntar saya liat
(SELAMAT MENCOBA) :D
esoknya saya kasih tau yang bener
Langganan:
Postingan (Atom)