Monday, July 23, 2018

Swap Two Numbers in C Using Pointers

In this article I would like to share with you a sample program that will swap the two numbers using Pointers in C.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.


Program Listing

swap.c

 #include <stdio.h> 
 
 int swap(int *x, int *y, int t); 
 
 main { 

 int x=0,y=0,t=0; 

 x=20; y=30; t=40; 

 printf(“\n The original value of x: %d”,x); 
 printf(“\n The original value of y: %d”,y); 
 printf(“\n The original value of t: %d”,t); 
 printf(“\nTheir values after calling the function and”); 
 swap(&x,&y,t);
 printf(“\ntheir effect when passed by reference/pointers”); 
 printf(“\n x+1 = %d”,x+1); 
 printf(“\n y+1 = %d”,y+1);
 printf(“\n t+1 = %d”,t+1); 
 getch(); 
 }  

  int swap(int *x, int *y, int t) 
  { 
  t = *x; 
  *x = *y; 
  *y = t;
  } 




Tuesday, July 10, 2018

Area of the Circle Solver in C

In this article I would like to share with you a simple program to solve the are of the circle using C language.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.


Program Listing

circle.c


#include <stdio.h> 

#define Pi 3.1416 

main() {  
 int r;   
 float A; 
 printf(“\n Enter the radius:”); 
 scanf(“%d”,&r); A=Pi*r*r; 
 printf(“\n The area:%f”,A); 
 return 0;
 }   

Sum of Two Number in C

A very simple program to ask the user to give two numbers and then our program will compute the sum of the two numbers using C language.


I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.


Program Listing.

sum.c


#include <stdio.h> 

main()
 {    

 int sum, n1,n2;     

 printf(“\n Enter two nos.”);   
 scanf(“%d%d”,&n1,&n2);   
 sum=n1+n2;  
 printf(“\n The sum: %d”,sum);  
return 0;
}   

Creates random numbers in a given file in C

In this sample program it will create a random numbers in a given file in C.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.



Program Listing

random.c

#include <stdio.h>
#include <conio.h>
#include <stdlib.h>

void main( )
{
FILE *fp ;
char str [ 67 ] ;
int i, noofr, j ;

clrscr( ) ;

printf ( "Enter file name: " ) ;
scanf ( "%s", str ) ;

printf ( "Enter number of records: " ) ;
scanf ( "%d", &noofr ) ;

fp = fopen ( str, "wb" ) ;
if ( fp == NULL )
{
printf ( "Unable to create file." ) ;
getch( ) ;
exit ( 0 ) ;
}

randomize( ) ;

for ( i = 0 ; i < noofr ; i++ )
{
j = random ( 1000 ) ;
fwrite ( &j, sizeof ( int ), 1, fp ) ;
printf ( "%d\t", j ) ;
}

fclose ( fp ) ;

printf ( "\nFile is created. \nPress any key to continue." ) ;

getch( ) ;
}

Linear search in a unsorted array in C

Here is a simple program in C that I would like to share with you guys a linear search in a unsorted array. The code is very simple and shows how to use C language in Linear Searching.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.



Program Listing

linear.c

#include <stdio.h>
#include <conio.h>

void main( )
{
int arr[10] = { 11, 2, 9, 13, 57, 25, 17, 1, 90, 3 } ;
int i, num ;

clrscr( ) ;

printf ( "Enter number to search: " ) ;
scanf ( "%d", &num ) ;

for ( i = 0 ; i <= 9 ; i++ )
{
if ( arr[i] == num )
break ;
}

if ( i == 10 )
printf ( "Number is not present in the array." ) ;
else
printf ( "The number is at position %d in the array.", i ) ;

getch( ) ;
}

Linear search in a sorted array in C

Here is a simple program in C that I would like to share with you guys a linear search in a sorted array. The code is very simple and shows how to use C language in Linear Searching.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.



Program Listing

linear.c

include <stdio.h>
#include <conio.h>

void main( )
{
int arr[10] = { 1, 2, 3, 9, 11, 13, 17, 25, 57, 90 } ;
int i, num ;

clrscr( ) ;

printf ( "Enter number to search: " ) ;
scanf ( "%d", &num ) ;

for ( i = 0 ; i <= 9 ; i++ )
{
if ( arr[9] < num || arr[i] >= num )
{
if ( arr[i] == num )
printf ( "The number is at position %d in the array.", i ) ;
else
printf ( "Number is not present in the array." ) ;
break ;
}
}

getch( ) ;
}

Sunday, July 8, 2018

Simple Product Information System in C++

A very simple program that I wrote using C++ to demonstrate the use of setprecision function in iomanip library of C++ and to show very basic inventory system written in C++ I use this example in my C++ programming class here in my hometown in Bacolod City, Negros Occidental Philippines. What does the program will do is to ask the user the product name, individual product cost, quantity of the product and then our program will compute the total cost of the product.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.




Sample Program Output



Program Listing

inventory.cpp


#include <iostream>
#include <iomanip>
#include <stdlib.h>

using namespace std;

int main()
{
string product;
float price=0.00;
int quantity=0;
float total_cost=0.00;
cout << "Simple Product Information System";
cout << "\n\n";
setprecision(2);
cout << "Give Product Name : ";
getline(cin,product);
cout << "Product Price : ";
cin >> price;
cout << "Product Quantity : ";
cin >> quantity;
total_cost = (price * quantity);
cout << "\n\n";
cout << "===== Display Report =====";
cout << "\n\n";
cout << "Product Name   :     " << product << "\n";
cout << "Product Price  : PHP " << price << "\n";
cout << "Quantity       :     " << quantity << "\n";
cout << "\n\n";
cout << "Total Cost     : PHP " << total_cost;
cout << "\n\n";
cout << "End of Program";
cout << "\n\n";
system("pause");
}





Sunday, July 1, 2018

Addition and Product of Two Numbers in C++

In this article I would like to share with you a programming activity that I prepare to my students in my class in computer programming 1 teaching c++ to find the sum and product of two numbers and allows the user to re run again the program. I am using Dev C++ in writing this program I hope you will find my work useful.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.




Sample Program Output


Program Listing

add_product.cpp


#include <iostream>
#include <stdlib.h>

using namespace std;


int main()
{
int a,b,sum,product;
char reply;
do {
system("cls");
cout <<"\tAddition and Product of Two Numbers in C++";
cout << "\n\n";
cout << "\t Created By Mr. Jake R. Pomperada, MAED-IT";
cout << "\n\n";
cout << "Enter First Value  : ";
cin >> a;
cout << "Enter Second Value : ";
cin >> b;
sum = (a+b);
product = (a * b);
cout << "\n\n";
cout <<"The sum of " << a << " and " << b << " is " << sum << ".";
cout << "\n\n";
cout <<"The product of " << a << " and " << b << " is " << product << ".";
cout << "\n\n";
cout << "Do you want to quit? [Y] for YES  and  [N] for NO : ";
    cin >> reply;
}  while (reply == 'n' || reply == 'N');
   cout << "\n\n";
   cout << "\t Thank you for using this software";
   cout <<"\n\n";
   cout << "\t End of Program";
   cout << "\n\n";
}





Friday, June 29, 2018

Greeter in LISP

A simple program to ask the user to give user name and then our program will greet the user using LISP as our programming language.

I am using Common LISP is open source and free to download in the Internet.

You can get the latest CLISP for Windows from here - https://sourceforge.net/projects/clisp/files/latest/download

 I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.


Sample Program Output


Program Listing

greeter.lisp

(defun Greeter()
   (terpri)
   (format t "Greeter in LISP ~%")
   (format t "~%~%")
   (format t "Created By Mr. Jake R. Pomperada, MAED-IT")
   (format t "~%~%")
   (princ "What is your name?  ")
   (setq user_name (read))
   (format t "~%")
   (format t "Hello ~s How are you today?  " user_name)
   (format t "~%~%")
   (format t "End of Program")
)
(Greeter)

Product of Two Numbers in LISP


Here is a simple program that I wrote using Common LISP that will ask the user to give two numbers and then our program will compute the product of the two numbers being provided by our user. I am using Common LISP is open source and free to download in the Internet.


You can get the latest CLISP for Windows from here - https://sourceforge.net/projects/clisp/files/latest/download

 I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.



Sample Program Output


product.lisp

(defun Product()
   (terpri)
   (format t "Product of Two Numbers in LISP ~%")
   (format t "~%~%")
   (format t "Created By Mr. Jake R. Pomperada, MAED-IT")
   (format t "~%~%")
   (princ "Enter First Value :  ")
   (setq a (read))
   (princ "Enter Second Value :  ")
   (setq b (read))
   (setq product (* a b))
   (format t "~%~%")
   (format t "The product is ~D." product)
   (format t "~%~%")
   (format t "End of Program")
)
(Product)


Addition of Two Numbers in LISP

Here is a simple program that I wrote using Common LISP that will ask the user to give two numbers and then our program will compute the sum of the two numbers being provided by our user. I am using Common LISP is open source and free to download in the Internet.

You can get the latest CLISP for Windows from here - https://sourceforge.net/projects/clisp/files/latest/download

 I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.


Sample Program Output


add.lisp

(defun Addition()
   (terpri)
   (format t "Addition of Two Numbers in LISP ~%")
   (format t "~%~%")
   (format t "Created By Mr. Jake R. Pomperada, MAED-IT")
   (format t "~%~%")
   (princ "Enter First Value :  ")
   (setq a (read))
   (princ "Enter Second Value :  ")
   (setq b (read))
   (setq total_sum (+ a b))
   (format t "~%~%")
   (format t "The Total Sum is ~D." total_sum)
   (format t "~%~%")
   (format t "End of Program")
)
(Addition)


Area of the Circle Solver in LISP

A very simple program that I will ask the user to give the radius of the circle and then our program will compute the it's are using LISP as our programming language.

I am currently accepting programming work, it project, school 

programming projects , thesis and capstone projects, IT consulting 

work, computer tutorials and web development work kindly contact me in the following email address for further details.  If you want to advertise in my website kindly contact me also in my email address also. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

My mobile number here in the Philippines is 09173084360.

My telephone number at home here in Bacolod City, Negros Occidental Philippines is  +63 (034) 4335675.


Sample Program Output


area.lisp

(defun AreaOfCircle()
   (terpri)
   (format t "Area of the Circle Solver ~%")
   (format t "~%~%")
   (format t "Created By Mr. Jake R. Pomperada, MAED-IT")
   (format t "~%~%")
   (princ "Enter Radius: ")
   (setq radius (read))
   (setq area (* 3.1416 radius radius))
   (format t "The Radius is = ~F~%The Area is ~F" radius area)
   (format t "~%~%")
   (format t "End of Program")
)
(AreaOfCircle)