Liberty BASIC Community Forum
« 3 salesman »

Welcome Guest. Please Login or Register.
Jan 23rd, 2018, 7:16pm


Rules|Home|Help|Search|Recent Posts|Notification


« Previous Topic | Next Topic »
Pages: 1  Notify Send Topic Print
 thread  Author  Topic: 3 salesman  (Read 125 times)
bluatigro
Guru
ImageImageImageImageImage


member is offline

Avatar

cxiu diversas el tio respondas cxiu samvaloras [ thats esperanto for : we are al different therefore we are al equal ]


PM

Gender: Male
Posts: 936
xx 3 salesman
« Thread started on: Oct 30th, 2017, 07:17am »

this is why you have to question every
number out of a investegation in the media
Code:
'' bluatigro 30 okt 2017
'' statestiek
dim a( 2 ) , b( 2 )
for i = 0 to 2
  read a , b
  a( i ) = a
  b( i ) = b
next i
data 7 , 14
data 5 , 13
data 2 , 7
print "there was some time ago a companie ."
print "it was making a smal los ."
print "the bos decided to sack 1 of the 3 salesman ."
print "the salesman al decided that they"
print "themselfs were the best"
print "and they can prove it ."
print "the bos gave them that chance ."
input "[ pres return ]" ; in$
print "data :"
print "salesman" , "year 1" , "year 2"
for i = 0 to 2
  print i + 1 , a( i ) , b( i )
next i
input "[ pres return ]" ; in$
print "salesman 1 :"
print "salesman" , "year 1" , "year 2" , "totaal"
for i = 0 to 2
  print i + 1 , a( i ) , b( i ) , a( i ) + b( i )
next i
input "[ pres return ]" ; in$
print "salesman 2 :"
print "salesman" , "year 1", "year 2" , "growth"
for i = 0 to 2
  print i + 1 , a( i ) , b( i ) , b( i ) - a( i )
next i
input "[ pres return ]" ; in$
print "salesman 3 :"
print "salesman" , "year 1" , "year 2" , "% growth"
for i = 0 to 2
  print i + 1 , a( i ) , b( i ) , int((b(i)-a(i))/a(i)*100);" %"
next i
print "[ end of story ]"
 


CHALLENCE :
find a example whit more than 3 salesman
User IP Logged

basic's : C64 Simons C128 Amiga Amos quick4.5 Visual5 Visual6 Visual2005 Visual2008 just and last but not least liberty
bluatigro
Guru
ImageImageImageImageImage


member is offline

Avatar

cxiu diversas el tio respondas cxiu samvaloras [ thats esperanto for : we are al different therefore we are al equal ]


PM

Gender: Male
Posts: 936
xx Re: 3 salesman
« Reply #1 on: Nov 1st, 2017, 05:18am »

i was not the first to notice this
see :
https://www.york.ac.uk/depts/maths/histstat/lies.htm
User IP Logged

basic's : C64 Simons C128 Amiga Amos quick4.5 Visual5 Visual6 Visual2005 Visual2008 just and last but not least liberty
Pages: 1  Notify Send Topic Print
« Previous Topic | Next Topic »

Rules|Home|Help|Search|Recent Posts|Notification

Donate $6.99 for 50,000 Ad-Free Pageviews!

| |

This forum powered for FREE by Conforums ©
Sign up for your own Free Message Board today!
Terms of Service | Privacy Policy | Conforums Support | Parental Controls