dalam program ini saya akan memberikan contoh program record menggunakan pascal,,, record adalah program yang berfungsi untuk menyimpan data dan memproses data yang akhirnya akan di tampilkan sesuai dengan instruksi yang diberikan...
dalam contoh ini saya membuat program record untuk menampilkan nama mahasiswa berdasarkan NRP dari yang terendah sampai tertinggi.
berikut source codenya :
Program urut_nilai;
uses wincrt;
const Nmaks = 100;
type
Mahasiswa = record
nim : integer;
nama : string[20];
kode : string[10];
nilai: string[5];
end;
Tampilkan postingan dengan label Pascal. Tampilkan semua postingan
Tampilkan postingan dengan label Pascal. Tampilkan semua postingan
perkalian matriks (pascal)
berikut ini contoh untuk program perkalian matrik menggunakan pascal....
listing program:
Program kali_matriks;
uses wincrt;
type
matriksint = array [1..20,1..20] of integer;
var
M,a,b : matriksint; p , q: integer;
procedure bacamatriks (var M:matriksint;Nbar,Nkol:integer);
var i,j: integer;
begin
for i:=1 to Nbar do
begin
for j:= 1 to Nkol do
begin
write ('M[',i,',',j,'] = ');readln (M[i,j]);
end;
end;
end;
listing program:
Program kali_matriks;
uses wincrt;
type
matriksint = array [1..20,1..20] of integer;
var
M,a,b : matriksint; p , q: integer;
procedure bacamatriks (var M:matriksint;Nbar,Nkol:integer);
var i,j: integer;
begin
for i:=1 to Nbar do
begin
for j:= 1 to Nkol do
begin
write ('M[',i,',',j,'] = ');readln (M[i,j]);
end;
end;
end;
