Free Programming Source Codes and Computer Programming Tutorials

Monday, August 3, 2020

Odd and Even Numbers Checkers in VB.NET

A simple program that I wrote to ask the user to give a number and then the program will check and determine whether the given number is an odd or even number using Microsoft Visual Basic.NET.

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.

Sample Program Output

Program Listing

Public Class Form1

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

Dim MyValue As Integer

Dim isEven As Boolean

MyValue = Val(TextBox1.Text)

If MyValue Mod 2 = 0 Then

isEven = True

MsgBox("The number " & " " & MyValue & " is an EVEN number.")

Else

MsgBox("The number " & " " & MyValue & " " & "is an Odd number.")

End If

End Sub

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

TextBox1.Text = ""

TextBox1.Focus()

End Sub

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

End

End Sub

End Class

Sunday, August 2, 2020

Subtraction of Two Numbers in Golang

I wrote this simple program using Go programming language to ask the user to give two numbers and then the program will compute the difference between of two numbers.

Sample Program Output

Program Listing

// substract.go
// Author : Jake Rodriguez Pomperada,MAED-IT,MIT
// Date    : August 2, 2020   10:20 AM
// Website : http://www.jakerpomperada.com
// Email   : jakerpomperada@gmail.com and jakerpomperada@yahoo.com

package main

import "fmt"

func main(){

    var n1 int
    var n2 int

    fmt.Print("\n\n")
    fmt.Print("\tSubtraction of Two Numbers in Golang")
    fmt.Print("\n\n")
    fmt.Print("\tEnter first number: ")
    fmt.Scanln(&n1) // take input from user
    fmt.Print("\tEnter Second number: ")
    fmt.Scanln(&n2) // take input from user

    solve := n1 - n2

    fmt.Print("\n")
    fmt.Println("\tThe difference between",n1,"and",n2, "is",solve,".")
    fmt.Print("\n")
    fmt.Print("\tEnd of Program")
    fmt.Print("\n")
}

Thursday, July 30, 2020

Today's Date in VB.NET

Today's Date in Visual Basic.NET

A very simple program that I wrote using Microsoft Visual Basic NET to display the current date.

Sample Program Output

Program Listing

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim dt As Date = Today

Label1.Text = "Today is " & dt

End Sub

End Class

Wednesday, July 29, 2020

Product of Two Numbers in Visual Basic 6

A simple program that I wrote to ask the user to give two numbers and then the program will compute the product of two numbers using Microsoft Visual Basic 6.

Sample Program Output

Program Listing

Private Sub Command1_Click()

Dim a, b, product As Integer

a = Val(Form1.Text1(0).Text)

b = Val(Form1.Text1(1).Text)

product = (a * b)

MsgBox ("The product of " & a & " and " & b & " is " & product & ".")

End Sub

Private Sub Command2_Click()

Form1.Text1(0).Text = ""

Form1.Text1(1).Text = ""

Form1.Text1(0).SetFocus

End Sub

Private Sub Command3_Click()

End

End Sub

Tuesday, July 28, 2020

Sum of Two Numbers in VB.NET

Write a program using Visual Basic.NET to ask the user to give two numbers and then the program will compute the sum of two numbers and display the results on the screen. Using Graphical User

Interface.

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/

Sample Program Output

Program Listing

Public Class Form1

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

If TextBox1.Text = "" Or IsNumeric(TextBox1.Text) = False Then

MessageBox.Show("Please enter a numeric value.")

TextBox1.Focus()

ElseIf TextBox2.Text = "" Or IsNumeric(TextBox2.Text) = False Then

MessageBox.Show("Please enter a numeric value.")

TextBox2.Focus()

Else

Dim sum As Integer = 0

Dim a As Integer = 0

Dim b As Integer = 0

a = Val(TextBox1.Text)

b = Val(TextBox2.Text)

sum = a + b

MessageBox.Show("The sum of " & a & " and " & b & " is " & sum & ".")

End If

End Sub

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

TextBox1.Text = ""

TextBox2.Text = ""

TextBox1.Focus()

End Sub

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

End

End Sub

End Class

Monday, July 27, 2020

Student Grading System in C

A simple program that I wrote using C programming language I called this program student grading system.

Sample Program Output

Program Listing

#include <stdio.h>

#define PRELIM_PERCENTAGE 0.20

#define MIDTERM_PERCENTAGE 0.30

#define ENDTERM_PERCENTAGE 0.50

int main()

{

char student[200];

char subject[100];

float solve_grade = 0.00;

int prelim=0,midterm=0,endterm=0;

float pre=0.00,mid=0.00,end=0.00;

printf("\n\n");

printf("\tStudent Grading System in C");

printf("\n\n");

printf("\tStudent's Name : ");

gets(student);

printf("\n");

printf("\tSubject Taken : ");

gets(subject);

printf("\n");

printf("\tPrelim Grade : ");

scanf("%d",&prelim);

printf("\tMidterm Grade : ");

scanf("%d",&midterm);

printf("\tEndterm Grade : ");

scanf("%d",&endterm);

/* Compute the student's grade */

pre = (prelim * PRELIM_PERCENTAGE);

mid = (midterm * MIDTERM_PERCENTAGE);

end = (endterm * ENDTERM_PERCENTAGE);

solve_grade = (pre + mid + end);

printf("\n\n");

printf("\t===== DISPLAY RESULT =====");

printf("\n\n");

printf("\tStudent's' Name : %s",student);

printf("\n");

printf("\tSubject Taken : %s",subject);

printf("\n");

printf("\tSubject Grade : %2.0f",solve_grade);

printf("\n\n");

printf("\tEnd of Program");

printf("\n");

}

Payroll Program in C

A simple payroll program that I wrote using the C programming language.

Sample Program Output

Program Listing

#include <stdio.h>

#define RATE_PER_DAY 84.50

int main()

{

char emp_name[200];

int days = 0;

float solve_salary = 0.00;

printf("\n\n");

printf("\tPayroll Program in C");

printf("\n\n");

printf("\tEmployee's Name : ");

gets(emp_name);

printf("\tNo. Day's Worked : ");

scanf("%d",&days);

/* Compute the employee's salary */

solve_salary = (days * RATE_PER_DAY);

printf("\n\n");

printf("\t===== DISPLAY RESULT =====");

printf("\n\n");

printf("\tEmployee's' Name : %s",emp_name);

printf("\n");

printf("\tEmployee's Salary : PHP %5.2f.",solve_salary);

printf("\n\n");

printf("\tEnd of Program");

printf("\n");

}

Sum and Product of Numbers in C

A simple program that I wrote using a C programming language to ask the user to give two numbers and then the program will sum and compute the product of the two given numbers and display the results in the screen.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, 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, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/

Sample Program Output

Program Listing

#include <stdio.h>

int main()

{

int a=0,b=0,sum=0,product=0;

printf("\n\n");

printf("\tSum and Product of Numbers in C");

printf("\n\n");

printf("\tGive Two Numbers : ");

scanf("%d%d",&a,&b);

/* Compute Sum and Product of Two Numbers */

sum = (a + b);

product = (a * b);

printf("\n\n");

printf("\t===== DISPLAY RESULTS =====");

printf("\n\n");

printf("\tThe sum of %d and %d is %d.",a,b,sum);

printf("\n");

printf("\tThe product of %d and %d is %d.",a,b,product);

printf("\n\n");

printf("\tEnd of Program");

printf("\n");

}

Thursday, July 23, 2020

Addition of Two Numbers in Golang

Here is a simple program to ask the user to give two numbers and then the program will compute the sum of two numbers and display the results using Golang programming language.

Sample Program Output

Program Listing

addition.go

// addition.go
// Author : Jake Rodriguez Pomperada,MAED-IT,MIT
// Date    : July 23, 2020 Thursday   10:01 PM
// Website : http://www.jakerpomperada.com
// Email   : jakerpomperada@gmail.com and jakerpomperada@yahoo.com

package main

import "fmt"

func main(){

    var n1 int
    var n2 int

    fmt.Print("\n\n")
    fmt.Print("\tAddition of Two Numbers in Golang")
    fmt.Print("\n\n")
    fmt.Print("\tEnter first number: ")
    fmt.Scanln(&n1) // take input from user
    fmt.Print("\tEnter Second number: ")
    fmt.Scanln(&n2) // take input from user

    result := n1 + n2

    fmt.Print("\n")
    fmt.Println("\tThe sum of",n1,"and",n2, "is",result,".")
    fmt.Print("\n\n")
    fmt.Print("\tEnd of Program")
    fmt.Print("\n")
}

Wednesday, July 22, 2020

Volume of a Sphere Converter in C

A simple program that I wrote using C programming language to compute the volume of a sphere.

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.unlimitedbooksph.com/

Sample Program Output

Program Listing

#include <stdio.h>

#define PI 3.14

int main()

{

float volume_sphere = 0.00;

float radius = 0.00;

printf("\n\n");

printf("\tVolume of a Sphere Converter");

printf("\n\n");

printf("\tEnter Radius Value : ");

scanf("%f",&radius);

/* Compute the volume of Sphere */

volume_sphere = (4.0/3.0)*(PI*radius*radius*radius);

printf("\n\n");

printf("\tThe Volume of Sphere is %5.2f.",volume_sphere);

printf("\n\n");

printf("\tEnd of Program");

printf("\n");

}

US Dollar To Philippine Peso Converter in C

I wrote this simple program to ask the user to give US dollar values and then the program will convert the given us dollar values into Philippine peso equivalent.

Sample Program Output

Program Listing

#include <stdio.h>

#define PHIL_PESO 50.74

int main()

{

float convert = 0.00, us_dollar = 0.00;

printf("\n\n");

printf("\tUS Dollar To Philippine Peso Converter");

printf("\n\n");

printf("\tEnter US Dollar Value : ");

scanf("%f",&us_dollar);

convert = (us_dollar * PHIL_PESO);

printf("\n\n");

printf("\tThe value of $%2.2f US Dollars in ",us_dollar);

printf("Philippine Peso is PHP %2.2f.",convert);

printf("\n\n");

printf("\tEnd of Program");

printf("\n");

}

Tuesday, July 21, 2020

Greet a Person in Pascal

I simple program to ask the user to give a name and then the program will greet the person using Pascal programming language. I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, 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, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/

Program Listing

program Greet_Person; Uses Crt; Var person : String[100]; begin Clrscr; Gotoxy(25,2); Write('Greet a Person in Pascal'); Writeln; Writeln; Write('What is your name? '); Readln(person); Writeln; Writeln; Write('Hello ',person,' How are you today?'); Writeln; Readln; end.

Greet a Person in Pascal

Product of Two Numbers in Pascal

Sunday, July 19, 2020

Multiplication Table in Pascal

I wrote this program to display a multiplication table using the Pascal programming language. I am using Free Pascal in writing this program.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.unlimitedbooksph.com/

Program Listing

program multiplication_table;

Uses Crt;

Var row,column : integer;

begin

row := 0; column := 0;

Clrscr;

gotoxy(12,2);

Write('Multiplication Table in Pascal');

Writeln; Writeln;

For row := 1 to 12 Do

Begin

For column := 1 to 12 Do

Begin

write(row * column:4);

end;

writeln;

end;

Writeln;

Gotoxy(17,17);

Write('End of Program');

Readln;

end.

Free Programming Source Codes and Computer Programming Tutorials

Monday, August 3, 2020

Odd and Even Numbers Checkers in VB.NET

Sunday, August 2, 2020

Subtraction of Two Numbers in Golang

Subtraction of Two Numbers in Golang

Thursday, July 30, 2020

Today's Date in VB.NET

Today's Date in VB.NET

Today's Date in Visual Basic.NET

Wednesday, July 29, 2020

Product of Two Numbers in Visual Basic 6

Product of Two Numbers in Visual Basic 6

Tuesday, July 28, 2020

Sum of Two Numbers in VB.NET

Sum of Two Numbers in VB.NET

Monday, July 27, 2020

Student Grading System in C

Payroll Program in C

Sum and Product of Numbers in C

Thursday, July 23, 2020

Addition of Two Numbers in Golang

Wednesday, July 22, 2020

Volume of a Sphere Converter in C

US Dollar To Philippine Peso Converter in C

Tuesday, July 21, 2020

Greet a Person in Pascal

Greet a Person in Pascal

Product of Two Numbers in Pascal

Sunday, July 19, 2020

Multiplication Table in Pascal

Google Ads

Followers