Tuesday, July 20, 2021

Add Two Numbers in Pascal

 In this article I will show you a simple program to ask the user to give two numbers  and the program will compute the sum of two numbers using Pascal programming language.

I am currently accepting programming work, IT projects, school and application development, programming projects, thesis and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me at the following email address for further details.  If you want to advertise on my website, kindly contact me also at my email address also. Thank you.

My email address is jakerpomperada@gmail.com and jakerpomperada@yahoo.com

My mobile number here in the Philippines is 09173084360.









Program Listing

Program Add_Two_Numbers;


Uses Crt;


Var x,y,sum : integer;



Begin

   Clrscr;

   Writeln;

   Write('Add Two Numbers in Pascal');

   Writeln;

   Writeln;

   Write('Enter First Number : ');

   Readln(x);

   Write('Enter First Second : ');

   Readln(y);


   sum := (x+y);


   Writeln;

   Write('The sum of ',x, ' and ' ,y, ' is ', sum , '.');

   Writeln;

   Writeln;

   Write('End of Program');

   Writeln;

   Readln;

End.




No comments:

Post a Comment