Free Programming Source Codes and Computer Programming Tutorials: June 2022

Thursday, June 30, 2022

Feet To Inches in Visual Basic 5

A simple program to ask the user to give feet value and then the program will covert the given feet into inches equivalent using Visual Basic 5 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 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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

Private Sub Command1_Click()

Dim inches As Double

feet = Val(Text1.Text)

inches = (feet * 12)

MsgBox (vbNewLine & "Feet Value : " & feet & " Feet(s)" & vbNewLine _

& vbNewLine & "Inches Equivalent : " & inches & " Inche(s)")

Text1.Text = ""

Text1.SetFocus

End Sub

Private Sub Command2_Click()

End

End Sub

Feet To Inches in Visual Basic NET

A simple program that will ask the user to give value in feet and then it will compute the inches using Microsoft Visual Basic NET programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

Public Class Form1

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

End

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim inches As Double

Dim feet As Double

feet = Val(TextBox1.Text)

inches = (feet * 12)

TextBox2.Text = feet & " Feet(s)"

TextBox2.ReadOnly = True

TextBox3.Text = inches & " Inche(s)"

TextBox3.ReadOnly = True

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TextBox1.Text = ""

TextBox2.Text = ""

TextBox3.Text = ""

TextBox1.Focus()

End Sub

End Class

Wednesday, June 29, 2022

Feet To Inches in C#

A simple program to ask the user to give feet value and then it will convert into inches in C# programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

using System;

using System.Collections.Generic;

using System.Text;

namespace ConsoleApplication1

{

class Program

{

static void Main(string[] args)

{

double inch=0.00;

Console.WriteLine();

Console.WriteLine("\t===========================================");

Console.WriteLine("\t\tFeet To Inches in C#");

Console.WriteLine("\t===========================================");

Console.WriteLine();

Console.Write("\tGive Feet Value : ");

double feet = Convert.ToDouble(Console.ReadLine());

inch = (feet * 12);

Console.WriteLine("\n");

Console.WriteLine("\t{0} Feet(s) is equal to {1} Inches", feet, inch);

Console.WriteLine("\n");

Console.WriteLine("\tThank You For Using This Program");

Console.ReadKey();

}

Tuesday, June 28, 2022

Simple Payroll Program in C# Using OOP

A simple payroll program that I wrote using object oriented programming approach using C# programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

using System;

namespace Simple_Payroll_OOP

{

// a simple payroll program that will ask the user number of days work

// and rate per day and compute the gross pay of an employee using C#

// oop approach in programming

class Program

{

static void PrintHeader()

{

Console.WriteLine("\t===========================================");

Console.WriteLine("\tSimple Payroll Program in C# Using OOP");

Console.WriteLine("\t===========================================");

Console.WriteLine();

}

static void Main(string[] args)

{

Payroll payRoll = new Payroll();

PrintHeader();

while(true)

{

Console.Write("\tEnter number of days worked (0 to quit): ");

int numDays = ConsoleInput.ReadInt();

if(numDays == 0)

break;

Console.Write("\tEnter pay rate: ");

double payRate = ConsoleInput.ReadDouble();

double netPay = payRoll.CalcGrossPay(numDays, payRate);

Console.WriteLine("\tNet pay: " + netPay);

}

SayGoodBye();

Console.ReadKey();

}

private static void SayGoodBye()

{

Console.WriteLine("\n");

Console.WriteLine("\tThank You For Using This Program");

}

class Payroll

{

public double CalcGrossPay(int daysWorked, double ratePerDay)

{

return daysWorked * ratePerDay;

}

Monday, June 27, 2022

How To Check Your Microsoft Windows Version

Odd and Even Number Using Function in C

A simple program that I wrote to ask the user to give any number and then the program will check if the given number is an odd and even number using functions and bitwise operator in C programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

/* odd_even_number.c

Jake Rodriguez Pomperada, MAED-IT, MIT

www.jakerpomperada.com and www.jakerpomperada@gmail.com

jakerpomperada@gmail.com

Bacolod City, Negros Occidental

#include <stdio.h>

/**

* Function to check even or odd

* Returns 1 is num is even otherwise 0

* if odd number. Using bitwise operator

* in a function to check for odd and even

* numbers

int isEven_Number(int num)

{

return !(num & 1);

}

int main()

{

int val_num=0;

printf("\n\n");

printf("\tOdd and Even Number Using Function in C\n");

printf("\n");

printf("\tGive any number: ");

scanf("%d", &val_num);

printf("\n\n");

if(isEven_Number(val_num))

{

printf("\tThe given number %d is even number.",val_num);

}

else

{

printf("\tThe given number %d is odd number.",val_num);

}

printf("\n\n");

printf("\tEnd of Program");

printf("\n");

return 0;

}

Sunday, June 26, 2022

US Dollar To Philippine Peso Using Function in C++

A simple program to ask the user to give us dollar money value and convert it into Philippine peso equivalent using C++ programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

#include <iostream>

#include <iomanip>

double us_peso(double us_value)

{

return(us_value * 53.50);

}

int main()

{

double us_dollar=0.00;

double compute=0.00;

std::cout <<"\n\n";

std::cout <<"\tUS Dollar To Philippine Peso Using Function in C++";

std::cout <<"\n\n";

std::cout <<"\tGive Value in US Dollar : ";

std::cin >> us_dollar;

compute = us_peso(us_dollar);

std::cout <<"\n\n";

std::cout << std::fixed << std::setprecision(2)

<< "\tThe equivaluent of US Dollar $" <<us_dollar <<

" to Philippine Peso is PHP " << compute;

std::cout <<"\n\n";

std::cout <<"\tEnd of Program";

std::cout <<"\n\n";

}

Saturday, June 25, 2022

While Loop Statement in Pascal

A simple program that I wrote to demonstrate how to declare and use while loop statement in Pascal programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

Program While_Loop;

uses

WinCrt; { Allows Writeln, Readln, cursor movement, etc. }

var x: integer;

begin

x := 1;

writeln;

write('While Loop Statement in Pascal');

writeln;

Writeln;

while x <= 10 do

begin

writeln('The value of x: ', x);

x := x + 1;

end;

writeln;

write('End of Program');

writeln;

end.

Friday, June 24, 2022

Increment and Decrement Operators in Go

A program that demonstrate increment and decrement operators in Go programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

package main

import "fmt"

func main() {

    fmt.Printf("\n")
    fmt.Printf("\tIncrement and Decrement Operators in Go\n\n")
    var x = 10

    fmt.Printf("\tInitial Value of X  : %d\n", x)
    x++

    fmt.Printf("\n")
    fmt.Printf("\tValue of X after Increment : %d\n\n", x)

    x--
    fmt.Printf("\tValue of X after Decrement : %d\n", x)
    fmt.Printf("\n")
    fmt.Printf("\tEnd of Program")
    fmt.Printf("\n")
}

Calculate Area and Circumference of Circle in Go

Calculate Area and Circumference of Circle

Machine Problem

Write a program to solve area and circumference of the circle using Go programming language.

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.

Please subscribe to my channel https://www.youtube.com/channel/UCOs-lpOoIeJoh6gpJthPoGg

=================================================

Want to support my channel?

GCash Account

Jake Pomperada

09173084360

Paypal

https://paypal.me/jakerpomperada

Patreon

https://www.patreon.com/jakerpomperada

Thank you very much for your support.

Program Listing

/* circle.go

Author : Mr. Jake Rodriguez Pomperada, MAED-IT, MIT

Date : March 21, 2021Sunday 9:18 AM

Websites :www.jakerpomperada.com and www.jakerpomperada.blogspot.com

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

package main

import "fmt"

const PI float64 = 3.14

func main(){

var rad float64

var ci float64

var area float64

fmt.Print("\n")

fmt.Print("\tCalculate Area and Circumference of Circle")

fmt.Print("\n\n")

fmt.Print("\tEnter radius of Circle : ")

fmt.Scanln(&rad)

area = PI * rad * rad

fmt.Print("\n")

fmt.Print("\tArea of Circle is : ")

fmt.Printf("%0.2f ",area)

ci = 2 * PI * rad

fmt.Print("\n\n")

fmt.Print("\tCircumference of Circle is : ")

fmt.Printf("%0.2f ",ci)

fmt.Print("\n\n")

fmt.Print("\n")

fmt.Print("\tEnd of Program")

fmt.Print("\n")

}