Sebelumnya kita harus paham tentang ASCII
dimana A = 0100 0001 (biner) dan 65 (Dec)
dll
==================================
TRANSLASI KE BAHASA PASCAL
uses crt;
var
x:integer;
begin
clrscr;
x:=65;
while (x<=89) do
begin
write(chr(x));
x:=x+1;
end;
readln;
end.
=========
NOTICE :
perintah chr pada bagian write merupakan function default dari library yang berfungsi mengkonversikan nilai numeric mencadi character sesuai dengan tabel ASCII, karena yang kita deklarasikan sebenarnya adalah x:integer dan memiliki nilai (65) yang berarti berupa decimal sementara yang akan kita tampilkan adalah sebuah karakter (A).
Senin, 08 Desember 2014
Perulangan : Menampilkan Bilangan Prima 1 - 20 dengan while - do
TRANSLASI KE BAHASA PASCAL
program bilprima;
Uses crt;
var
prima,nilai,pembagi:integer;
Begin
Clrscr;
prima:=1;
while prima <= 20 do
begin
nilai:=0;
pembagi:=1;
while pembagi <= prima do
begin
if prima mod pembagi=0 then
nilai:=nilai+1;
pembagi:=pembagi+1;
end;
if nilai=2 then
begin
write(' ',prima);
prima:=prima+1;
end
else
prima:=prima+1;
end;
readln;
end.
=============================================================
program bilprima;
Uses crt;
var
prima,nilai,pembagi:integer;
Begin
Clrscr;
prima:=1;
while prima <= 20 do
begin
nilai:=0;
pembagi:=1;
while pembagi <= prima do
begin
if prima mod pembagi=0 then
nilai:=nilai+1;
pembagi:=pembagi+1;
end;
if nilai=2 then
begin
write(' ',prima);
prima:=prima+1;
end
else
prima:=prima+1;
end;
readln;
end.
=============================================================
Sabtu, 11 Oktober 2014
Logika Pemrograman : Pengkondisian IF...ELSE(IF) Bersarang
IF...ELSE(IF) Bersarang
Pengkondisian IF...ELSE bersarang biasa kita gunakan ketika terdapat 2 atau lebih pilihan dimana didalam pilihan tersebut dibagi lagi dalam syarat yang berbeda.
Pengkondisian IF...ELSE bersarang biasa kita gunakan ketika terdapat 2 atau lebih pilihan dimana didalam pilihan tersebut dibagi lagi dalam syarat yang berbeda.
Logika Pemrograman : Pengkondisian IF...ELSE(IF)
Dalam pemrograman terdapat beberapa pengkondisian seperti IF...ELSE(IF), Case dll
Berikut akan kita bahas sedikit tentang pengkondisian IF ELSE
IF...ELSE(IF)
Pengkondisian IF...ELSE biasa kita gunakan ketika terdapat 2 pilihan sedangkan IF...ELSE IF digunakan ketika terdapat lebih dari 2 pengkondisian
Berikut akan kita bahas sedikit tentang pengkondisian IF ELSE
IF...ELSE(IF)
Pengkondisian IF...ELSE biasa kita gunakan ketika terdapat 2 pilihan sedangkan IF...ELSE IF digunakan ketika terdapat lebih dari 2 pengkondisian
Rabu, 01 Oktober 2014
PHP
PHP (Hypertext Preprocessor) merupakan bahasa pemrograman berbasis web yang bekerja pada server side.
Minggu, 31 Agustus 2014
Senin, 25 Agustus 2014
Turbo Pascal
for rachmat :
turbo pascal ===>>> http://adf.ly/rTGbg
turbo pascal versi 7.0 ===>>> http://adf.ly/rTGr0
turbo pascal ===>>> http://adf.ly/rTGbg
turbo pascal versi 7.0 ===>>> http://adf.ly/rTGr0
Sabtu, 09 Agustus 2014
Langganan:
Postingan (Atom)