Tutorial Download Free Pascal and Program by using Arrays to display the table of student scores in the Student Name, Nim, Value 1, Value 2, Value 3 and Average Value

What Will I Learn?

this is my contribution in the tutorial, I want to build a Program by using Array to display the table of student scores in Student Name, Nim, Value 1, Value 2, Value 3 and Average Value.

• How would I show the student tables on my campus by using Arrays,

Requirements

• I use Free Pascal
• you can download it in the link below

download

Difficulty

• Intermediate

Tutorial Contents

• An Array is a collection of data values ​​of the same type in a particular order using a similar name. The data values ​​in an array are called array elements.
• Free Pascal is an open source compiler for Pascal and Object Pascal languages ​​that runs cross platform

This tutorial to help students, this tutorial uses the Indonesian language because I will display the table of student values ​​in the Student Name, Nim, Value 1, Value 2, Value 3 and Average Score of students residing in one campus located in Indonesia

if you have not yet free pascal, you can download it first in this link Free Pascal and below his tutorial

• after exiting the image as below, click start download
  

• after finished download then will come out like picture below and click next
  )

• then will come out like the picture below and click next
  

• then will come out like the picture below and click next
  

• then it will come out like the picture below and click install
  

• then will come out like the picture below and click next
  

• the last click install and free pascal was already in use
  

this is a short tutorial I created, which I use Free Pascal to display the table of student grades in the Student Name, Nim, Value 1, Value 2, Value 3 and Average Value.

• First Open Freepascal Version 3.0.4
  

• Create a new page to fill in Coding and Copy Coding Next to the Coding page (next page)

Program tabel;

uses crt;

type mahasiswa=record

nama, NIM:string;

SATU,DUA,TIGA,Nilai:real;

end;

B=array [1..100] of mahasiswa;

var

i,j,N:integer;

A:B;

begin

clrscr;

 write('Banyak mahasiswa ? ');readln(n);

 for i:=1 to n do

begin

clrscr;

write('Nama mahasiswa ke',i,' : ');readln(A[i].nama);

write('NIM mahasiswa ke',i,' : ');readln(A[i].nim);

write('Nilai satu mahasiswa ke ',i,' : ');readln(A[i].satu);

write('Nilai dua mahasiswa ke ',i,' : ');readln(A[i].dua);

write('Nilai tiga mahasiswa ke ',i,' : ');readln(A[i].tiga); writeln;

A[i].Nilai:=(A[i].satu + a[i].dua + a[i].tiga)/3;

end;

begin

clrscr;

writeln;

writeln('                              <<<-------DAFTAR NILAI MAHASISWA------>>>');

writeln('                          <<<>>>PROGRAM STUDI SISTEM INFORMASI UNIMAL<<<>>>');

writeln('---------------------------------------------------------------------------------------------------');

writeln('     NIM               NAMA            Nilai Satu       Nilai Dua       Nilai Tiga     NILAI RATA  ');

writeln('---------------------------------------------------------------------------------------------------');

for j:=1 to n do

begin

writeln(A[j].nim:0,        A[j].nama:23,      A[j].satu:13:2,A[j].dua:16:2,A[j].tiga:17:2,A[j].nilai:15:2);

end;

writeln('---------------------------------------------------------------------------------------------------');

readkey;

end;

end.

• or will appear as below
  

• First save the coding that has been pasted freepascal coding page, Then press Ctrl + F9 simultaneously, there will be a cmd display and enter the number of students (example as drawn)
  

• There will be a dicmd display and then fill in what is requested from Name, Nim, and Value 1 - Value 3, When ready to display As below
  

Hopefully my tutorial can be helpful and helpful, thank you, follow me @feryhusaini

---

Posted on Utopian.io - Rewarding Open Source Contributors

---