123 Eng

Engineering the engineers™


Latest Jobs   Forum Map

 


Home
Source Codes
Engineering Colleges

Training  Reports
Seminar Reports
Placement Papers

Forums

   Computer Science / IT
   Electronics
   Electrical
   Mechanical
   Chemical
   Civil

   CAT / MBA

   GMAT / Foreign MBA
Latest Jobs

Engineering Jobs / Technical Jobs
Management Jobs

Sitemap
Terms of use

Displaying  Source Code(s)  
 

 
swim

--------------------------------------------------------------------------------

Description : the local swiming pool wants to monittor the number of pepole

Code :
program swim;
{brian colston}
uses crt;
const
max=200;
var
attendance:array[1..max] of integer;
index:integer;
numdays:integer;
highest:integer;
lowest:integer;
average:real;
counter:integer;
count:1..5;
option:char;
choice:char;
monthly_file:text;


procedure monthly_stats;
begin
assign(monthly_file, 'A:monthly_file.txt');
index=1;
while not eof(monthly_file) and index<=max do
readln(attendance)[index];
index=index +1;
end-while;
numdays=index-1;
close monthly_file;
end
end;

 

Contribute content or training reports / feedback / Comments
job placement papers
All rights reserved copyright 123ENG