Membuat Program Kontreversi Waktu
Program Konversi_Waktu;
Uses Wincrt;
Var j,m,d,h:integer;
begin
Writeln('Program Konversi Waktu');
Writeln('======================');
Writeln;
Write('Masukkan...
Program Pascal Membuat Program Kontreversi Suhu
Membuat Program Kontreversi Suhu
Program Konversi_Suhu;
Uses WinCrt;
var f,c:real;
begin
Writeln('Program Konversi Fareinheit Ke Celcius');
Writeln('======================================');
Writeln;
Write('Masukan...
Program Pascal Membuat Program Menghitung Jarak
Membuat Program Menghitung Jarak
Program Menghitung_Jarak;
Uses WinCrt;
var
x1,x2,y1,y2:integer;
d:real;
begin
Writeln('Program Menghitung Jarak...
Program Pascal Membuat deret angka 1 sampai 10
Membuat deret angka 1 sampai 10
program deratangka1sampai10;
uses wincrt;
var i,batas:integer;
begin
{write('Masukkan integer positif,=');
readln(batas);}
for...
Membuat Program Jenis Bilangan Bulat
Membuat Program jenis bilangan bulat
program jenis_bilangan_bulat;
uses wincrt;
var
x : integer;
begin
write ('Masukkan sembarang angka=');read(x);
if...
Program Pascal Membuat program Huruf A sampai Z
Membuat program Huruf A sampai Z
program hurufAsampaiZ;
uses wincrt;
var i,batas:char;
begin
write('Masukkan huruf a sampai z=');read(batas);
for...
Program Pascal Membuat Program Binatang
Membuat program Binatang
program binatang;
uses wincrt;
var baris,kolom:integer;
begin
clrscr;
for baris:=1 to 8 do
begin
for kolom:=1 to baris...
Program Pascal Membuat program Hadiah Belanja
Membuat program Hadiah Belanja
program hadiahBelanja;
Uses wincrt;
var
x:integer;
begin
write('masukkan harga=');read(x);
if x<=49.999 then
write...
Program Pascal Membuat program Grade
Membuat program Grade
Program nilai_mahasiswa;uses wincrt;VarNilai : Real ;Grade : Char ;nama : string ;Beginwrite('NAMA ANDA: ',nama);read(nama);Write('NILAI...
Program Pascal Membuat program GanjilGenap
Membuat program GanjilGenap
program Ganjilgenap;uses wincrt;var bil:integer;beginfor bil:=6 to 16 doif bil mod 2=1 thenwrite(bil,' ');readln;en...
Program Pascal Membuat program deretEDCBA
Membuat program deretEDCBA
program deretEDCBA;uses wincrt;var i,batas:char;begin{write('masukkan integer positif=');readln(batas);}for i:='e' downto...
Program Pascal Membuat program DeretAngka2
Membuat program DeretAngka2
program deretangka2;uses wincrt;var i,batas:integer;beginwrite('masukkan integer positif=');readln(batas);for i:=batas downto...
Program Pascal Membuat program Deretan angka sampai 10
Membuat program Deretan angka sampai 10
program deratangka1sampai10;uses wincrt;var i,batas:integer;begin{write('Masukkan integer positif,=');readln(batas);}for...
Program Pascal Membuat Program deretABCDE
Membuat Program deretABCDE
program deretABCDE;uses wincrt;var i,batas:char;begin{write('masukkan integer positif=');readln(batas);}for i:='a' to 'e'...
Program Pascal Membuat program bilngankelipatan5
Membuat program bilngankelipatan5
program bilangankelipatan5;uses wincrt;var bil,batas:integer;beginwrite('Masukkan integer positif,=');readln(batas);for...
Program Pascal Membuat Program keliling lingkaran
Membuat Program keliling lingkaran
program genap;
uses wincrt;
var
x : integer;
begin
write('masukkan sembarang angka =');read (x);
if x mod 2=0...
Program Menghitung Jumlah Hari Dengan Pemograman Delphi
Silahkan klik gambar di bawah ini untuk mendonwload soucecode nya:
unit UnitJumHari;interfaceuses Windows, Messages, SysUtils, Classes, Graphics,...
Subscribe to:
Posts (Atom)
