Pascal Program For Matrix Multiplication

Pascal Program For Matrix Multiplication: This is a Pascal program to Multiply arrays A[i , j] and B[i, j]. 

Each element of the resulting matrix is multiplied by 1/4, and the result is displayed in a new Array.

What is an Array?


An array consists of rows and columns, and in programming, it is a data type used to hold a range of data of the same type.

The same data type here could be integer, string, Boolean, or real.

Logic of The Program


The Arrays used in this computation have two rows and two columns respectively, hence the resulting matrix or array must also be a 2 x 2 matrix.

First, the two arrays are multiplied together, where a row is used to multiply a column.

After their multiplication which is given to a new Array C, the result in Array C is multiplied by 1/4 to give the final matrix D whose result is displayed as an output to the user.

As with most looping Pascal Programs, here we've implemented the FOR DO control statement, which ensures that we're working with a 2 x 2 Matrix.

The FOR DO structure in Pascal Programming is given by:

FOR variable:= startvalue TO endvalue Do
Statement(s) 

Program Code



Program begn;
Var
A, B, C, D : Array [1..2,1..2] of real;
I, j: integer;

Begin
  For i:= 1 to 2 do
    For j:= 1 to 2 do
      Begin
      Readln (A[i, j]);
      End;
 

Begin
  For i:= 1 to 2 do
    For j:= 1 to 2 do
      Readln (B[i, j]);
      End;
 
 
Begin
  For i:= 1 to 2 do
    For j:= 1 to 2 do
      C[i, j]:= A[i, j] * B[i, j];
      End;
  
Begin
  For i:= 1 to 2 do
    For j:= 1 to 2 do
      D[i, j]:= 1/4 * C[i, j];
      End;
 
 
Begin
  For i:= 1 to 2 do
    For j:= 1 to 2 do
      Writeln (D[i, j]);
      Readln;
      End;
End.
 
   

Conclusion

Following the same logic in this Pascal Program For Matrix Multiplication, you can multiply numbers in a 3 x 2 array and do many more array computations in Pascal.



Also Read:

BASIC Program For Sum of Numbers Using IF Then Statement
Pascal Arithmetic Program Using IF THEN statement
Pascal Program to Create and Save Records in a Textfile
Pascal program To Calculate Area of a Triangle
 Pascal Program of Matrix Multiplication
Pascal Program to Find The Average Of Only Positive Numbers Using While Do loop
  

Do you like this post? Please link back to this article by copying one of the codes below.

URL Of Post:


HTML Link Code:

BB (forum) link code:

Comments