Product of Two Numbers in Visual FoxPro

Product of Two Numbers in Visual FoxPro

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

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

* Computer Button     * Click

product = VAL(thisform.txtvalue1.Text) * VAL(thisform.txtvalue2.Text)

thisform.label3.caption = "The result is " + LTRIM(STR(product)) +"."

* Clear Button   * Click

thisform.txtvalue1.Value = ""

thisform.txtvalue2.Value = ""

thisform.label3.Caption = ""

thisform.txtvalue1.SetFocus

If Statement in C++

If Else Statement in C++

If Else Statement in C++

 In this article I will show you how to declare and use if-else statement in 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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

//if_else.cpp

//Author   : Mr. Jake R. Pomperada, BSCS, MAED-IT, MIT

//Date     : October 30, 2020  Friday

//Location :  Bacolod City, Negros Occidental

//Website  : http://www.jakerpomperada.com

//Email    : jakerpomperada@gmail.com

#include <iostream>

using namespace std;

 int main()

 {

     int age = 0;

      cout <<"\n\n";

      cout << "\tIf Else Statement in C++";

      cout << "\n\n";

      cout <<"\tGive Your Age : ";

      cin >> age;

      cout <<"\n\n";

    if (age>=18) {

        cout << "\tYour age is " << age <<  ". You are already an Adult.";

 }

     else {

        cout << "\tYour age is " << age <<  ". You are still a Minor.";

}

    cout << "\n\n";

cout <<"\tEnd of Program";

cout << "\n\n";

    return 0;

 }

If Statement in C++

 A simple program that I wrote using C++ to demonstrate how to declare and use if statement.

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

// year_level.cpp

// Author   : Mr. Jake R. Pomperada, BSCS, MAED-IT, MIT

// Date     : October 30, 2020   Friday

// Website  : http://www.jakerpomperada.com

// Email    : jakerpomperada@jakerpomperada.com

#include <iostream>

using namespace std;

int main()

{

int year_level=0;

cout <<"\n\n";

cout << "\tYear Level Checker in C++";

cout << "\n\n";

cout << "\tWhat is your year level? : ";

cin >> year_level;

if (year_level==1) {

cout <<"\n\n";

cout <<"\tYou belong to Freshmen.";

}

if (year_level==2) {

cout <<"\n\n";

cout <<"\tYou belong to Sophomore.";

}

if (year_level==3) {

cout <<"\n\n";

cout <<"\tYou belong to Juniors.";

}

if (year_level==4) {

cout <<"\n\n";

cout <<"\tYou belong to Seniors.";

}

if (year_level <1 || year_level >4) {

cout <<"\n\n";

cout <<"\tInvalid Year Level. Try Again !!!";

}

cout <<"\n\n";

cout <<"\tEnd of Program";

cout <<"\n\n";

}

Fahrenheit to Celsius Converter in Python

Quotient and Remainder in C++

Fahrenheit to Celsius Converter in Python

 

Write a program that will ask the user to input the temperature in Fahrenheit

and then, the program will convert the given temperature into Celsius equivalent.

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

# Jake Rodriguez Pomperada, MAED-IT, MIT

# October 29, 2020

# jakerpomperada@gmail.com

# Bacolod City, Negros Occidental

print("@==============================================@")

print("   Fahrenheit to Celsius Converter in Python    ")

print("@==============================================@")

print("");

Fahrenheit = int(input("Enter a temperature in Fahrenheit: "))

Celsius = (Fahrenheit - 32) * 5.0/9.0

print("")

print ("Temperature Value is ", Fahrenheit);

print("")

print("Fahrenheit Equivalent is %.2f" % round(Celsius,2),"\u00b0C")

print("")

print("===== THE END OF PROGRAM =====     ")

print("")

cout in C++

 In this article, I will show you how to use the cout command in 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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

// cout.cpp

// February  19, 2020

// Bacolod City, Negros Occidental Philippines

#include <iostream>

using namespace std;

int main()

{

    cout <<"\n\n";

    cout <<"\tAuthor : Jake Rodriguez Pomperada";

    cout <<"\n\n";

    cout << "\tSample Text Display Using cout in C++";

    cout <<"\n\n";

    cout <<"\tEnd of Program";

    cout <<"\n\n";

}

Sorting Array in Descending Order in ASP NET

Sorting Array in Descending Order in ASP.NET

 A simple program that I wrote to sort the given numbers in an array in descending order in Microsoft ASP.NET

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

Public Class _Default

    Inherits System.Web.UI.Page

    

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

        Dim sortarray As Integer() = New Integer() {1, 2, 6, 4, 7, 3, 5}

        For Each k As Integer In sortarray

            Label2.Text += " " & k & " "

        Next

        Array.Sort(sortarray)

        ' sort in Ascending order

        For Each k As Integer In sortarray

            Label4.Text += " " & k & " "

        Next

        Array.Reverse(sortarray)

        ' sort in Descending order

        For Each k As Integer In sortarray

            Label3.Text += " " & k & " "

        Next

    End Sub

End Class

Super Tekla at ang kanyang saloobin sa nangyari. - Ogie Diaz

Sorting an Array in Ascending Order in ASP.NET

 A simple program that I wrote using VB.NET and ASP.NET to sort an array in ascending order.

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

Public Class _Default

    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

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

        Dim sortarray As Integer() = New Integer() {1, 2, 6, 4, 7, 3, 5}

        For Each k As Integer In sortarray

            Label2.Text += " " & k & " "

        Next

        Array.Sort(sortarray)

        ' sort in ascending order

        For Each k As Integer In sortarray

            Label3.Text += " " & k & " "

        Next

    End Sub

End Class

Highest Value in Array List in ASP NET

Highest Value in Array List in ASP.NET

 A simple program that I wrote in VB.NET and ASP.NET to check which of the array list value has the highest value.

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

Public Class _Default

    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Public Function DetermineMax(ByVal itemList As ArrayList)

        Dim max As Integer = Nothing

        For i As Integer = 0 To (itemList.Count - 1)

            If i = 0 Then

                max = itemList(i)

            Else

                If itemList(i) > max Then max = itemList(i)

            End If

        Next

        DetermineMax = max

    End Function

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

        Dim numList As New ArrayList

        numList.Add(1)

        numList.Add(523)

        numList.Add(3)

        numList.Add(155)

        numList.Add(123)

        numList.Add(15)

        numList.Add(25)

        numList.Add(1225)

        numList.Add(5)

        Label1.Text = "==== List of Numbers ===== "

        For i As Integer = 0 To numList.Count - 1

            Dim val As String = numList(i).ToString()

            Label1.Text += "<br />" + val

        Next

        Label2.Text = "The highest number is " + DetermineMax(numList).ToString()

    End Sub

End Class

Finding Duplicate Numbers in ASP NET

Finding the Duplicate Numbers in ASP.NET

 I show you how to write a program that will determine which of the numbers in the given list is duplicate using Microsoft ASP.NET.

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.

Program Listing

using System;

using System.Collections.Generic;

using System.Linq;

using System.Web;

using System.Web.UI;

using System.Web.UI.WebControls;

namespace Duplicate

{

    public partial class _Default : System.Web.UI.Page

    {

               

    

        protected void Button1_Click1(object sender, EventArgs e)

        {

           Dictionary<int, string> num_bers = new Dictionary<int, string>() {  

            {1,"1"},  

            {2,"2"},  

            {3,"3"},  

            {4,"4"},  

            {5,"3"},  

            {6,"1"},  

            {7,"1"},

            {8,"1"},  

            {9,"4"},

            {10,"4"}  

        };

        Label1.Text = "List of Numbers..........";

        foreach (KeyValuePair<int, string> pair in num_bers)

        {

            Label1.Text += "<br />" + pair.Key + " ........ " + pair.Value;

        }

        //get dictionary duplicate values.

        var duplicatesValue = num_bers.GroupBy(x => x.Value).Where(x => x.Count() > 1);

        Label1.Text += "<br /><br />List of Numbers that has Duplicate Values..........<br />";  

        foreach(var item in duplicatesValue)

        {

            Label1.Text += item.Key + "<br />";

        }

        }

        

        }

       

    }

Addition of Two Numbers in ASP NET

Addition of Two Numbers in ASP.NET

 I wrote this program to ask the user to give two numbers and then the program will compute the sum of two numbers using Microsoft ASP.NET

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

Public Class _Default

    Inherits System.Web.UI.Page

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

        Dim a, b, sum As Integer

        a = Val(TextBox1.Text)

        b = Val(TextBox2.Text)

        sum = (a + b)

        TextBox4.Text = Val(sum)

    End Sub

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

        TextBox1.Text = ""

        TextBox2.Text = ""

        TextBox4.Text = ""

        TextBox1.Focus()

    End Sub

End Class

Odd and Even Number Checker in ASP NET

Odd and Even Number Checker in ASP.NET

 I wrote this program to ask the user to give a number and then the program will check and determine whether the given number is odd or even using Microsoft ASP.NET

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

Public Class _Default

    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

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

        Dim a As Integer

        a = Val(TextBox1.Text)

        If (a Mod 2 = 0) Then

            Label1.Text = "The given number " + TextBox1.Text + " is even number."

        Else

            Label1.Text = "The given number " + TextBox1.Text + " is odd number."

        End If

    End Sub

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

        TextBox1.Text = ""

        Label1.Text = ""

        TextBox1.Focus()

    End Sub

End Class

Quotient and Remainder Numbers in C++

I wrote this program that will ask the user is asked to enter two number (divisor and dividend) and the quotient and the remainder of their division is computed.

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 I also accepting computer repair, networking, and Arduino Project development at a very affordable price.

Program Listing

// divident.cpp

// Jake Rodriguez Pomperada, MAED-IT,MIT

// www.jakerpomperada.com / www.jakerpomperada.blogspot

// jakerpomperada@gmail.com

// Bnacolod City, Negros Occidental Philippines

#include <iostream>

using namespace std;

int main()

{

    int divisor=0, dividend=0;

    int quotient=0, remainder=0;

    cout << "\n\n";

    cout << "\tQuotient and Remainder Numbers in C++";

    cout << "\n\n";

    cout << "\tGive dividend value : ";

    cin >> dividend;

    cout << "\n";

    cout << "\tGive divisor value  : ";

    cin >> divisor;

    quotient = (dividend / divisor);

    remainder = (dividend % divisor);

    cout << "\n\n";

    cout << "\tThe Quotient Value  : " << quotient <<"\n";

    cout << "\tThe Remainder Value : " << remainder;

    cout << "\n\n";

    cout << "\tEnd of Program";

    cout << "\n\n";

}