algoritma program array

array adalah bentuk multidimensi yang paling sederhana

pendekklarasian array mudah bila kita mengerti maksud nya berikut contoh program array:



 

 bila gambar kurang jelas, copas scrip berikut :

program up_to_you;
uses crt;
const
semester =3;
nama =4;
n=100;
type
nilai=array[1..semester,1..nama] of integer;
var
a,b:integer;
angka:nilai;
mahas:array[1..n] of string;
begin
for a:=1 to nama do
begin
write('nama_mhs :');
readln(mahas[a]);
for b:= 1 to semester do
begin
write('semester',b,'=');
readln(angka[b,a]);
end;
end;
clrscr;
writeln('masukkan data ');
writeln(' nama   semester1  semester 2   semester3');
for a:=1 to nama do
begin
write(mahas[a]:6);
for b:=1 to semester do
write(angka[b,a]:10);
writeln;
end;
end.

// saya memakai system operasi dos jadi saya memakai uses crt ;,, jika kalian memakai windows bisa di ganti dengan uses wincrt ;

selamat mencoba di run kan kawan :

Location:

Share :