Προγραμματισμός Η/Υ (2010-11)

[BM]

Φίλε, το έχω δώσει άπειρες φορές, και το αποτέλεσμα είναι σε δυαδικό σύστημα: μηδέν, ή άσσος...

Πρέπει να "το έχεις"...

[pinkrose]

Ενταξει βρε παιδια δεν ειναι και τοσο τραγικα τα πραγματα!Ειδικα για οσους εκαναν προγραμματισμο.Με το να το παιρνετε με φοβο δεν εχει νοημα!

[shaman]

Φίλε, το έχω δώσει άπειρες φορές, και το αποτέλεσμα είναι σε δυαδικό σύστημα: μηδέν, ή άσσος...

Πρέπει να "το έχεις"...

ποοοσο πολυ συμφωνω... απλα ακομα δεν ξερω τι γινεται αν δεν το'χεις

[MAKIA182]

νομιζω το σημαντικο ειναι να εχεις στο νου σου οτι απευθυνεσαι σε ενα ''χαζοκουτι που το μονο που κανει ειναι να εκτελει γρηγορα υπολογισμους'', οπως μας ελεγαν στο λυκειο.... θα πρεπει να φροντισεις δηλ οι εντολες σου να εχουν μια λογικη σειρα (πρωτα θα διαβασεις τις πλευρες ενος τριγωνου και μετα θα υπολογισεις την περιμετρο του) αλλα και να μην επιτρεψεις να υποπεσει σε (μαθηματικα ή μη) λαθη πχ να διαιρεσει με μηδεν, υπολογισμο ριζας αρνητικου αριθμου...
ο υπολογιστης δεν εχει κριτικη σκεψη, αντιθετα εσεις πρεπει να τον βοηθησετε με ακριβεις εντολες-οδηγιες να επιλυσει το προβλημα...
Ψυχραιμια ,λοιπον, πανω απο ολα και να διαβαζεται πολυ καλα τι σας ζηταει. (και εκεινα τα σημεια με τις επαναληψεις, ταξινομησεις τα μαθαινεται απεξω). καλη τυχη

[cwk-john]

να ρωτησω κάτι γινεται σε μια ασκηση πχ που σου λεει να βρεισ το μ.ο ολων των φοιτητων σε καθε μαθημα πχ 1000 φοιτητες 20 μαθήματα να φτιάξω εναν καινούργιο πίνακα ΑΜΟ(10000 ΠΟΥ ΝΑ ΈΧΩ ΕΚΕΙ ΜΕΣΑ τους μ.ο και αν ναι πρεπει αρχικα να μηδενισω τον πινακα ΑΜΟ ??

[Jimmis]

Και εγω μια ερωτηση στα υποπρογραμματα γιατι δεν χρησιμοποιουμε
Call subr(a,b,c,d)
αυτο με το common ειναι αρκετα δύσχρηστο.

[blindone1712]

σε κάποιες ασκήσεις π έχω από σημειώσεις,έχω δεί τον όρο float...μπορεί κάποιος να μου θυμίσει τι είναι γτ έχω χρόνια π έχω ξεχάσει το άθλημα..

[cwk-john]

FLOAT(X) μετατρέπει τον ακεραιο σε πραγματικό

[TsoliaS]

Μπορεί κάποιος που παρακολουθούσε να γράψει ποιες εντολές Fortran εκτός αυτών του βιβλίου μπορούν να χρησιμοποιηθούν???

[tsoukadr]

Ανεβαζω τη λυση του 1ου θεματος 2010 κανονικη.Μην φοβαστε δεν υπαρχουν 'παρεξηγησιμες' εντολες.ολο 77!

Κώδικας: Επιλογή όλων

PROGRAM KOUFWM
      DIMENSION DIME(6),ENGTH(3),ZBMAX(3)
      C=0.5
      DIME(1)=1.20
      DIME(2)=1.40
      DIME(3)=1.50
      DIME(4)=1.70
      DIME(5)=2.00
      DIME(6)=2.20
      ENGTH(1)=10.0
      ENGTH(2)=8.0
      ENGTH(3)=15.0
      ITEMP=1
      DO 100 I=1,3,1
      ZBMAX(I)=((ENGTH(I)-C)/(DIME(1)+C)*DIME(1))
      
      DO 200 J=1,5,1
      ZB=((ENGTH(I)-C)/(DIME(J)+C)*DIME(J))
      IF (ZB.GT.ZBMAX(I)) THEN
      ZBMAX(I)=ZB
      ITEMP=J+1
      ENDIF
      
      
  200 CONTINUE
       
      WRITE(*,1000) ENGTH(I),DIME(ITEMP)
 1000 FORMAT(1X,'MAX LIGHT',1X,'FOR',1X,
     1 'WALL LENGTH',1X,'L=',1X,F5.1,'M',1X,'WE NEED',1X,
     2 'WINDOW OF',1X,F5.2,'M')
  100 CONTINUE
      
      STOP
      END   

εκανα και καποιες διορθωσεις γιατι υπηρχε μικτες εκφρασεις την οποια ο compiler της 77 το δεχτηκε αλλα στο βιβλιο λεει ΟΧΙ.Βεβαια λογικο μου φαινεται να μην μπλεκεις πραγματικες με ακεραιες.Επισης ερωτηση το double precision τι ακριβως ειναι?το εχει μια απο τις λυσεις του site.

Είναι σίγουρα σωστή η απάντησή σου??? Για παράδειγμα στη 2η DO που κάνεις δεν είναι 1,6 και όχι 1,5?????