dibawah ini merupakan sebuah coding program dari bahasa pemrograman pascal..
ini adalah coding untuk menentukan nilai 1 dan nilai 2.
untuk lebih jalas, silahkan anda untuk mencobanya.
dan buat yg mau nyontek, bikin'a jangan sama percis ya,,!! hhee
uses crt;
var
cinta,hargadiri,martabat : integer;
begin
clrscr;
write ('Masukan bilangan 1 : ');readln(cinta);
write ('Masukan bilangan 2 : ');readln(hargadiri);
martabat :=1;
while martabat<=hargadiri do
begin
write (cinta*martabat,' ' );
martabat :=martabat+1;
end;
readln;
end.
0 komentar:
Posting Komentar