#include<stdio.h>
 #include<conio.h>

 void main(void)
 {
 double x[100], y[100], z[100]; //harom vektor valos szamok tarolasara
 double xosszeg;
 int i, n, darab, xdarab;
 clrscr();   //kepernyotorles
 printf("\n Terbeli pontok helykoordinatainak vizsgalata.");
 n=17; //a ZH feladat eloirja

 for(i=0; i<n; i++) //pontosan n-szer fut le: 0, ..., n-1
  {
   printf("\n Kerem a %d. pont x iranyu koordinatajat:", i+1); //kepernyore iraskor i+1 jelenik meg, de ettol i erteke valtoratlan marad
   scanf("%g", &x[i]);  //beolvasas az x vektor i-edik rekeszebe

   printf("\n Kerem a %d. pont y iranyu koordinatajat:", i+1); //kepernyore iraskor i+1 jelenik meg, de ettol i erteke valtoratlan marad
   scanf("%g", &y[i]);

   printf("\n Kerem a %d. pont z iranyu koordinatajat:", i+1); //kepernyore iraskor i+1 jelenik meg, de ettol i erteke valtoratlan marad
   scanf("%g", &z[i]);
  }

 for(i=darab=xdarab=0, xosszeg=0; i<n; i++)
  {
   if ( (-1*x[i] + 2*y[i] + 7*z[i]) > 0 )       //ha a skalaris szorzat pozitiv
      darab++;   //noveli a darab erteket 1-el, ezzel szamlalja a talalatokat

   if ( y[i] > 0 )  //ha az i. pont y koordinataja pozitiv
      {
       xdarab++;    //a feltetelnek eleget tevo pontok szamanak novelese 1-el
       xosszeg+=x[i]; //a feltetelnek eleget tevo pontok x koordinatajanak osszegzege
      }
  } //ciklus vege

  printf("\n %d esetben volt a vizsgalt skalaris szorzat pozitiv.", darab); //eredmeny kiirasa a kepernyore

  if ( xdarab == 0 )
     printf("\n Egyetlen pont y koordinataja sem volt pozitiv.");
  else
     printf("\n A pozitiv y koordinataju pontok x koordinatajanak atlaga: %f", (float) xosszeg/xdarab);

  getch();  //billentyu lenyomasaig varakozik
 }       //main fuggveny torzsenek a vege

 // FIGYELEM! A gyakorlaton hasznalt BorlandC szoftver hasznalatakor jelentkezo:
 // floating point format not linked
 // futasi hiba a telepitett rendszer tulzott "lebutitasanak" kovetkezmenye, ez a program jól működik.