Έλεγχος άσκησης.

[GeorgeG]

Το ξέρω σας έχω κουράσει για αυτό δεν περιμένω απάντηση σύντομα 

Εκφώνηση
Σ' έναν αγώνα μπάσκετ είχαν συμμετοχή Ν παίκτες μιάς ομάδα. Να γραφεί πρόγραμμα που να ζητά τον αριθμό Ν ( δεν μπορεί να ειναι μεγαλύτερος απο 10 ) και στη συνέχεια για κάθε παίκτη να ζητά τα στοιχεία¨
1. Πόντους που πέτυχε , 2. Φάουλ που έκανε 3.τρίποντα Εύστοχα και 4. Τρίποντα Αστοχα.
Στη συνέχεια το πρόγραμμα να εμφανίζει: 1. Σύνολο Πόντων της ομάδας ,2. Συνολικό αριθμό Φάουλ, 3. Μέσο όρο πόντων ανά παίκτη και 4. Ποσοστό Ευστοχίας στα Τρίποντα συνολικά για την ομάδα.

program test1;
uses crt;
var n,i,sum_ola,sum_pontous,sum_faoul,sun_triponta:integer;
sum_triponta,pontous,faoul,triponta,triponta_a:integer;
mesos_oros,pososto_ey:real;
begin
clrscr;
sum_ola:=0;
sum_pontous:=0;
sum_faoul:=0;
sun_triponta:=0;
sum_triponta:=0;
repeat
writeln('Dwse arithmo n');
readln(n);
if n>10 then
writeln('dwse swsto arithmo mexri to 10');
until n<10;
for i:=1 to n do
begin
writeln('Pontous poy petyxe');
readln(pontous);
repeat
writeln('Faoul Pou Ekane');
readln(faoul);
if faoul>4 then
writeln('Dwse swsta faoul');
until faoul<=4;
repeat
writeln('Triponta Eystoxa');
readln(triponta);
if (triponta*3)>pontous then
writeln('Dwse swsta triponta');
until (triponta*3)<pontous;
writeln('Dwse triponta astoxa');
readln(triponta_a);
sum_pontous:=sum_pontous+pontous;
sum_faoul:=sum_faoul+faoul;
sun_triponta:=sun_triponta+triponta_a;
sum_triponta:=sum_triponta+triponta;
sum_ola:=sun_triponta+sum_triponta;
end;
mesos_oros:=sum_pontous/n;
pososto_ey:=(sum_triponta/sum_ola)*100;
writeln('Synolo pontwn ths omadas :',' ',sum_pontous);
writeln('Synolikos arithmos faoul :',' ',sum_faoul);
writeln('Meso oros pontwn ana paikth :', ' ', mesos_oros:0:0);
writeln('pososto eystoxias sta triponta synolika gia thn omada :', ' ',pososto_ey:0:0,'%');
readln;
end.

[petrosp13]

Με μια πρώτη ματιά θα σου έλεγα ότι οι έλεγχοι για τα φάουλ και τα τρίποντα είναι περιττοί, αφού δεν ζητώνται
Τις εντολές που υπολογίζουν τα συνολικά τρίποντα μπορείς να τις συμπτύξεις σε μια
Θα έλεγα να δώσεις και ένα δεκαδικό ψηφίο για μέσο όρο και ποσοστό

Δεν έχει λάθος το πρόγραμμα σου

[GeorgeG]

Και εγώ για αυτό το λόγο το έκανα επειδή δεν το διατυπώνει στην εκφώνηση. Άμα έλεγε ο,τι δεν χρειάζεται να κάνω έλεγχο στην εισαγωγή των δεδομένων δεν θα το έκανα. Υπάρχει περίπτωση στις πανελλήνιες να διατυπωθεί τέτοια άσκηση και να πρέπει να κάνουμε έλεγχο δεδομένων χωρίς να μας ζητηθεί απο την εκφώνηση?

[petrosp13]

Να κάνεις ακριβώς όσα λέει η εκφώνηση
Τίποτα λιγότερο, τίποτα περισσότερο

[GeorgeG]

OK