Computer Science Canada Programming C, C++, Java, PHP, Ruby, Turing, VB   Username:   Password: Wiki   Blog   Search   Turing   Chat Room  Members
The Age Program
Author Message
scholarlytutor

Posted: Mon Jul 15, 2019 7:10 pm   Post subject: The Age Program

I just made this for kicks. If you can't bother to think about how old someone is based on their birthday, just enter it into this program.

If anyone detects a problem with the calculation, please let me know. I've tried multiple people and things seem to work correctly.

% The Age program.
% Find out a person's age by entering their birth date and today's date.
% Programmed by scholarlytutor

% Variables

var bday, bmonth, byear : int %birth date
var cday, cmonth, cyear : int %current date
var age : int %calculated age

% Program

put "Enter the day, month and year when the person was born."
put "For example, for July 20, 1980, type in 20 7 1980."
get bday, bmonth, byear
put "Now, enter the day, month and year of today's date."
put "Use the same number format above."
get cday, cmonth, cyear

%Checks if their birthday already happened this year
if cmonth < bmonth then
age := (cyear - byear) - 1
elsif cmonth = bmonth then
if cday < bday then
age := (cyear - byear) - 1
else
age := cyear - byear
end if
else
age := cyear - byear
end if

%Outputs the person's age
put "The person is ", age, " years old."

 Display posts from previous: All Posts1 Day7 Days2 Weeks1 Month3 Months6 Months1 Year Oldest FirstNewest First

Page 1 of 1  [ 1 Posts ]
 Jump to:  Select a forum  CompSci.ca ------------ - Network News - General Discussion     General Forums   -----------------   - Hello World   - Featured Poll   - Contests     Contest Forums   -----------------   - DWITE   - [FP] Contest 2006/2008   - [FP] 2005/2006 Archive   - [FP] 2004/2005 Archive   - Off Topic     Lounges   ---------   - User Lounge   - VIP Lounge     Programming -------------- - General Programming     General Programming Forums   --------------------------------   - Functional Programming   - Logical Programming   - C     C   --   - C Help   - C Tutorials   - C Submissions   - C++     C++   ----   - C++ Help   - C++ Tutorials   - C++ Submissions   - Java     Java   -----   - Java Help   - Java Tutorials   - Java Submissions   - Ruby     Ruby   -----   - Ruby Help   - Ruby Tutorials   - Ruby Submissions   - Turing     Turing   --------   - Turing Help   - Turing Tutorials   - Turing Submissions   - PHP     PHP   ----   - PHP Help   - PHP Tutorials   - PHP Submissions   - Python     Python   --------   - Python Help   - Python Tutorials   - Python Submissions   - Visual Basic and Other Basics     VB   ---   - Visual Basic Help   - Visual Basic Tutorials   - Visual Basic Submissions     Education ----------- - Student Life   Graphics and Design ----------------------- - Web Design     Web Design Forums   ---------------------   - (X)HTML Help   - (X)HTML Tutorials   - Flash MX Help   - Flash MX Tutorials   - Graphics     Graphics Forums   ------------------   - Photoshop Tutorials   - The Showroom   - 2D Graphics   - 3D Graphics     Teams ------ - dTeam Public

 Style: Appalachia blueSilver eMJay subAppalachia subBlue subCanvas subEmjay subGrey subSilver subVereor Search: