Nájde najmenšie číslo postupnosti

Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
Kategória: Programy v C, C++

Program: Mensi.c

Nájde najmenšie číslo postupnosti.
// MENSI.C                   Copyright (c) TrSek alias Zdeno Sekerak
// Najdenie najmensieho cisla postupnosti.
//
// Datum:28.05.96                               http://www.trsek.com 
 
#include <stdio.h>
 
void main ()
{
  int n,
      min,
      a,
      i=1;
 
  printf ("\nZadaj pocet prvkov postupnosti: ");
  scanf  ("%d", &n);
 
  printf ("\nZadaj prvok %d: ", i);
  scanf  ("%d", &a);
 
  min = a;
  for (i=2; i<=n; i++)
  {
     printf ("Zadaj prvok %d: ", i);
     scanf  ("%d", &a);
 
     if (a < min)
        min = a;
  }
 
  printf ("\nNajmensi prvok je %d.", min);
}