/* Ohjelmalla lasketaan mittakaavamuunnoksia.                               */
/* Vesa Lappalainen 18.9.1991                                               */
#include <stdio.h>
#define MITTAKAAVA 200000.0
#define MM_KM      (1000.0*1000.0)


void ohjeet(void)
{
  printf("Lasken kartalta millimetrein„ mitatun matkan\n");
  printf("kilometrein„ luonnossa.\n");
}

int kysy_matka()
{
  int mm;
  printf("Anna matka millimetrein„>");
  scanf("%d",&mm);
  return mm;
}

double kysy_mittakaava()
{
  double mittakaava=MITTAKAAVA;
  printf("Anna mittakaava muodossa 1:2000 (1:%3.0lf) >",mittakaava);
  scanf("1:%lf",&mittakaava);
  return mittakaava;
}

double mittakaava_muunnos(int matka_mm,double mittakaava)
{
  return matka_mm*mittakaava/MM_KM;
}

void tulosta_matka(double matka_km)
{
  printf("Matka on luonnossa %1.1lf km.\n",matka_km);
}

int main(void)
{
  ohjeet();
  tulosta_matka(mittakaava_muunnos(kysy_matka(),kysy_mittakaava()));
  return 0;
}