Quantcast
Channel: ADSLgr.com Community Forum
Viewing all articles
Browse latest Browse all 47983

Pascal

$
0
0
Γεια σας, ήθελα να σας ρωτήσω κάτι σχετικά με την Pascal και συγκεκριμένα για τον Μέσο Όρο.
1) Μπορείτε να μου πείτε ποιο είναι το λάθος

Κώδικας:

Program Lesson1_Program1;
var a, b, c, : Integer
Sum : Integer
Average : Integer

Begin
Write('A');
Readln(a);
Write('B')
ReadIn('b')
Write('C')
Readin(c)
Sum := a + b + c
Average := Sum / 3; 
ReadIn('Average: ' ,Average,) 
End.

2) Έχω το PAME. Πιστεύω ότι είναι μια βλακεία και μισή. Υπάρχει κανένα άλλο;

Viewing all articles
Browse latest Browse all 47983

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>