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 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

 

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

 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


Wednesday, October 28, 2020

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

 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 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

 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

 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";
}