Learn Computer Programming Free from our source codes in my website.
Sponsored Link Please Support
https://www.techseries.dev/a/27966/qWm8FwLb
https://www.techseries.dev/a/19181/qWm8FwLb
My Personal Website is http://www.jakerpomperada.com
Email me at jakerpomperada@gmail.com and jakerpomperada@yahoo.com
Sunday, November 1, 2020
String Palindrome in Pascal
A simple program that I wrote using Pascal to check if the given string or number is a palindrome or not a palindrome.
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.
My website is www.jakerpomperada.blogspot.com and www.jakerpomperada.com
Program Listing
(* Palindrome.Pas *)
(* Author : Mr. Jake Rodriguez Pomperada, MAED-IT, MIT *)
(* Webite : www.jakerpomperada.com / www.jakerpomperada.blogspot.com *)
(* Email : jakerpomperada@gmail.com *)
(* Location : Bacolod City, Negros Occidental, Philippines *)
program Palindrome;
var
S: string;
i, f: integer;
begin
writeln;
Write('String Palindrome in Pascal');
writeln;
writeln;
f := 0;
Write('Give a String : ');
Readln(S);
writeln;
for i := 1 to length(S) div 2 do
if s[i] <> s[length(s) - i + 1] then
begin
Write('The given string ', S, ' is not a Palindrome.');
f := 1;
break;
end;
if f = 0 then
begin
Write('The given string ', S, ' is a Palindrome.');
end;
writeln;
writeln;
Write('End of Program');
Readln;
end.
The if conditional statement in PHP
In this tutorial, I will discuss how to declare the if conditional statement using PHP 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.
My website is www.jakerpomperada.blogspot.com and www.jakerpomperada.com
Program Listing
<?php
// The if conditional statement in PHP
// Jake R. Pomperada, MAED-IT, MIT
// www.jakerpomperada.com
// jakerpomperada@gmail.com
// Bacolod City, Negros Occidental Philippines
echo "<h4>
</h4>";
$age = 6;
if ($age>=18) {
echo "At the age of $age you are already an Adult.";
}
if ($age<18) {
echo "At the age of $age you are still a Minor.";
}
?>
String Concatenation in PHP
A simple program that I wrote to demonstrate how to use string concatenation in PHP 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.
My website is www.jakerpomperada.blogspot.com and www.jakerpomperada.com
Program Listing
<?php
// String Concatenation in PHP
// Jake R. Pomperada, MAED-IT, MIT
// www.jakerpomperada.com
// jakerpomperada@gmail.com
$title = "Introduction";
$title .= " PHP ";
$title .= " Programming ";
$title .= "By Jake R. Pomperada";
echo "<h4>String Concatenation in PHP</h4>";
echo "<i> $title </i>";
?>
Menu Program in C++
A simple program that I wrote to demonstrate how to create a menu program using C++ programming.
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.
My website is www.jakerpomperada.blogspot.com and www.jakerpomperada.com
Program Listing
// Created By: Mr. Jake Rodriguez Pomperada, MAED-IT, MIT
// Date : October 31, 2020 Saturday
// Tool : C++
// Email : jakerpomperada@gmail.com
// Website : www.jakerpomperada.com
// Place : Bacolod City, Negros Occidental
#include <iostream>
using namespace std;
void menu()
{
char choice;
do {
system("cls");
cout << "\n\t\t\tMenu Program in C++";
cout << "\n\n\t Created By: Mr. Jake R. Pomperada,MAED-IT,MIT";
cout << "\n\n";
cout << "\n\t\t\t [1] Add Record ";
cout << "\n\t\t\t [2] Edit Record ";
cout << "\n\t\t\t [3] Delete Record ";
cout << "\n\t\t\t [4] View Record ";
cout << "\n";
cout << "\n\t\t\t [5] Quit Program ";
cout << "\n\n";
cout << "\n\t\t Enter Your Choice :=> ";
cin >> choice;
if (choice == '1') {
cout << "\n\n You select Add";
cout << "\n\n";
system("pause");
menu();
}
else if (choice == '2') {
cout << "\n\n You select Edit";
cout << "\n\n";
system("pause");
menu();
}
else if (choice == '3') {
cout << "\n\n You select Delete";
cout << "\n\n";
system("pause");
menu();
}
else if (choice == '4') {
cout << "\n\n You select View";
cout << "\n\n";
system("pause");
menu();
}
else if (choice == '5') {
cout << "\n\n\tThanks for using this program and return to OS.";
cout << "\n\n";
break;
}
else if (choice != '5') {
cout << "\n\n\n \t\t\t Invalid Option Try Again...";
cout << "\n\n";
system("pause");
}
} while (choice != '5');
}
// Main Program
int main()
{
menu();
}
Addition of Three Numbers in PHP Using Functions
I simple program that I wrote using PHP to add the sum of three numbers using functions.
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
<?php
// Addition of Three Numbers in PHP Using Functions
// Jake R. Pomperada, MAED-IT, MIT
// www.jakerpomperada.com
// jakerpomperada@gmail.com
function addition($x, $y, $z)
{
return($x + $y + $z); // return the sum of three numbers
}
$a=5; $b=10; $c=15;
$display_results = addition($a,$b,$c); // calling the function addition
echo "<h4> Addition of Three Numbers in PHP Using Functions</h4>";
echo "The sum of $a, $b, and $c is $display_results.";
?>
Current Date in PHP
I wrote this simple program to demonstrate how to display the current date in PHP 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
<?php
echo "<h3>Current Date in PHP</h3>";
echo "\n";
echo "Today is " .date("M. d, Y");
?>
Addition of Five Numbers in C
I wrote this program using C programming language to ask the user to give five numbers and then the program will compute the total sum of the five numbers given by the user.
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
/* addition.c
Addition of Five Numbers in C
Author : Jake Rodriguez Pomperada, MAED-IT, MIT
Email : jakerpomperada@gmail.com
Tool : Dev C++ Version 5.11
Date : October 31, 2020 Saturday 7:01 PM
*/
#include <stdio.h>
int main()
{
int a=0,b=0,c=0,d=0,e=0;
int sum=0;
system("COLOR F0");
printf("\n\n");
printf("\tAddition of Five Numbers in C");
printf("\n\n");
printf("\tGive 1st Value : ");
scanf("%d",&a);
printf("\tGive 2nd Value : ");
scanf("%d",&b);
printf("\tGive 3rd Value : ");
scanf("%d",&c);
printf("\tGive 4th Value : ");
scanf("%d",&d);
printf("\tGive 5th Value : ");
scanf("%d",&e);
sum = (a+b+c+d+e);
printf("\n");
printf("\tThe total sum of %d, %d, %d, %d and %d is %d."
,a,b,c,d,e,sum);
printf("\n\n");
printf("\tEnd of Program");
printf("\n\n");
}
Friday, October 30, 2020
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