Hello World in Visual Basic 6

I wrote this simple program to display the message hello world message in a form in Microsoft Visual Basic 6 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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

Private Sub Form_Load()

Label1.Caption = "Hello World"

End Sub

Concatenation of String in C

A simple program that I wrote to accept two string and then the program will combine the two words using C 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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

concat.c

/* concat.c

   Author : Jake R. Pomperada,MAED-IT

   Date   : December 8, 2019

*/

#include <stdio.h>

#include <string.h>

int main()

{

        char a[100], b[100];

printf("\n\n");

printf("\tConcatenation of String Using C Language.");

printf("\n\n");

  printf("\tEnter the first string  : ");

       gets(a);

       printf("\n");

       printf("\tEnter the second string : ");

       gets(b);

      strcat(a, b);

     printf("\n\n");

     printf("\tThe combined string is  %s.", a);

     printf("\n\n");

     printf("\tEnd of Program");

}

Lowercase To Uppercase String in C

A simple program to ask the user to give a string in lowercase and then the program will convert into uppercase format string using C 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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

uppercase.c

/* uppercase.c

   Author : Jake R. Pomperada,MAED-IT

   Date   : December 8, 2019

*/

#include <stdio.h>

#include <string.h>

main()

{

char str[100];

printf("\n\n");

printf("\tLowerCase To UpperCase Using C Language.");

printf("\n\n");

printf("\tGive String To Convert into UpperCase : ");

gets(str);

printf("\n\n");

printf("\tThe Uppercase Equivalent is  %s.",strupr(str));

printf("\n\n");

printf("\tEnd of Program");

}

Star Pattern in C++

A simple program that will ask the user to give a number and then the program will display a diamond image using asterisk symbol using the C++ 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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

star.cpp

#include<iostream>

using namespace std;

int main()

{

int n=0;

cout <<"\n\n";

cout <<"\tStar Pattern in C++";

cout <<"\n\n";

cout<<"\tGive a Value : ";

cin>>n;

cout <<"\n\n";

int m=10;

int s=n-1;

for(int i=1;i<=n;i++)

{

for(int j=2*n-3;j>=s;j--)

{

cout<<" ";

}

for(int p=10;p>=m;p=p-1)

{

cout<<"*";

}

cout<<"\n";

m=m-2;

s++;

}

int y=n-1;

int v=2*n-2;

for(int q=n;q>=1;q--)

{

for(int g=n-1;g>=y;g--)

{

cout<<" ";

}

for(int h=1;h<v;h=h+1)

{

cout<<"*";

}

cout<<"\n";

y--;

v=v-2;

}

cout <<"\n";

cout <<"\tEnd of Program";

cout <<"\n\n";

}

Mean, Mode and Median Checker in C++

A program that will ask the user how many items to be processed and the program will ask the user to give a series of integer values and then the program will check and determine which of the given number in a mean, mode and median using C++ 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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

#include <iostream>

using namespace std;

int main()

{

int array[50],sum=0, n=0,median1=0,median2=0, mode=0,count[50];

int pos1=0,pos2=0;

sum=0;

float mean=0.00;

cout <<"\tMean, Mode and Median Checker in C++";

cout <<"\n\n";

cout<<"\tHow many items? : ";

cin>>n;

cout <<"\n\n";

for(int a=0;a<n;a++)

{

cout<<"\tGive value in item no. "<<a+1 << " : ";

cin>>array[a];

count[a]=0;

}

for(int b=0;b<n;b++)

{

sum=sum+array[b];

}

cout <<"\n";

cout <<"\tDisplay Results";

cout <<"\n\n";

cout<<"\tThe Sum is : "<<sum;

int small,pos,temp;

for(int i=0;i<n-1;i++)

{

small=array[i];

pos=i;

for(int j=i+1;j<n;j++)

{

if(small>array[j])

{

small=array[j];

pos=j;

}

}

temp=array[pos];

array[pos]=array[i];

array[i]=temp;

}

mean=sum/n;

cout <<"\n";

cout<<"\tThe Mean is : "<<mean;

if(n%2!=0)

{

pos1=pos2=(n+1)/2;

}

else

{

pos1=n/2;

pos2=n/2 +1;

}

median1=array[pos1];

median2=array[pos2];

cout <<"\n";

cout<< "\tThe Median is  : "<<median1<<"\t : "<<median2;

for(int c=0;c<n; c++)

{

for(int d=0;d<n;d++)

{

if(array[c]==array[d])

{

count[c]++;

}

}

}

int modepos,max=count[0];

for(int e=1;e<n;e++)

{

if(max<count[e])

{

max=count[e];

modepos=e;

}

}

mode=array[modepos];

cout <<"\n";

cout<<"\tThe Mode is : "<<mode;

cout <<"\n";

cout <<"\tEnd of Program";

cout <<"\n\n";

}

Find the Biggest Number in Go

Design a program to find the maximum of the three numbers using nested if statement using Golang 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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

/* highest_number.go

   Written By :

   Jake R. Pomperada

     April 3, 2019 Wednesday

   Bacolod City, Negros Occidental

*/

package main

import "fmt"

var a,b,c int32

func main() {

fmt.Print("\n");

fmt.Print("\tFind the Biggest Number");

fmt.Print("\n\n");

fmt.Print("\tEnter Three Numbers :  ");

fmt.Scanln(&a,&b,&c);

if(a >= b) {

if(a>= c) {

fmt.Print("\n");

fmt.Print("\t" ,a," is the largest number.");

} else  {

fmt.Print("\n");

fmt.Print("\t",c," is the largest number.");

}

}else if(b >= c) {

fmt.Print("\n");

fmt.Print("\t",b," is the largest number.");

}else {

fmt.Print("\n\n");

fmt.Print("\t" ,c," is the largest number.");

}

fmt.Print("\n\n");

fmt.Print("\tEnd of Program");

fmt.Print("\n");

}

Find the Area of the Rectangle Using Go

A simple program that I wrote using Go programming language to solve the area of the rectangle.

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 in the following email address for further details.  If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.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.

Here in Bacolod City, Negros Occidental I also accepting computer repair, networking and Arduino Project development at a very affordable price.

My Facebook address is https://www.facebook.com/profile.php?...

My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com

I am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.mindshaperspublishing.com/

https://www.unlimitedbooksph.com/

Thank you very much for your help and support.

Sample Program Output

Program Listing

rectangle.go

/* rectangle.go

   Author : Mr. Jake Rodriguez Pomperada, MAED-IT

   Date   : December 7, 2018   Friday   4:32 PM

   Emails : jakerpomperada@gmail.com and jakerpomperada@yahoo.com

*/

package main

import "fmt"

      

func main(){

       

      var area int  

       var l,b int

      

    fmt.Print("\n\n")

    fmt.Print("\tArea of the Rectangle Solver")

    fmt.Print("\n\n")

    fmt.Print("\tGive Length of Rectangle : ")

    fmt.Scan(&l)

    fmt.Print("\n")

    fmt.Print("\tGive Breadth of Rectangle : ")

    fmt.Scan(&b)

    area = l * b

    fmt.Print("\n\n")

    fmt.Println("\tArea of Rectangle : ",area) 

    fmt.Print("\n\n")

    fmt.Print("\tEnd of Program")

    fmt.Print("\n")

}