/* matka_a2.c */
/* Ohjelmalla lasketaan mittakaavamuunnoksia 1:200000 kartalta              */
/* Vesa Lappalainen 18.9.1991                                               */
#include <stdio.h>
#define MITTAKAAVA 200000.0
#define MM_KM      (1000.0*1000.0)

void ohjeet(void)
{
  printf("Lasken 1:%3.0lf kartalta millimetrein„ mitatun matkan\n",MITTAKAAVA);
  printf("kilometrein„ luonnossa.\n");

}

void kysy_matka(int *pMatka_mm)
{
  printf("Anna matka millimetrein„>");
  scanf("%d",&*pMatka_mm);
}

double mittakaava_muunnos(int matka_mm)
{
  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)
{
  int    matka_mm;
  double matka_km;

  ohjeet();
  kysy_matka(&matka_mm);
  matka_km = mittakaava_muunnos(matka_mm);
  tulosta_matka(matka_km);
  return 0;
}