Σελ. 3 από 3 ΠρώτηΠρώτη 123
Εμφάνιση 31-43 από 43

Θέμα: Pascal

  1. #31
    Εγγραφή
    11-03-2005
    Μηνύματα
    7.449
    Downloads
    24
    Uploads
    0
    Τύπος
    ADSL OTE
    Ταχύτητα
    24576/1024
    ISP
    OTEnet
    DSLAM
    ΟΤΕ - ΚΕΡΑΜΕΙΚΟΣ
    Router
    CISCO Systems K9 SMB
    Ετσι πρέπει να είναι

    var a, b, c : Integer ;

    αλλιώς γράψτες ξεχωρισά !

    var a : Integer ;
    var b : Integer ;
    var c : Integer ;

  2. #32
    Εγγραφή
    07-07-2013
    Περιοχή
    Παντού και πουθενά
    Μηνύματα
    477
    Downloads
    3
    Uploads
    0
    ISP
    ΟΤΕ Conn-x
    Router
    TD-W8960N
    1) Μια ερώτηση παιδιά. Πείτε ότι έχω δύο αρχεία file1 και file2 και θέλω να μεταφέρω τo περιεχόμενο από το ένα αρχείο στο άλλο χρησιμοποιώντας pascal, ποια εντολή χρησιμοποιώ;
    2) Ποια η διαφορά μεταξύ
    Κώδικας:
    end
    end.
    end;
    Τελευταία επεξεργασία από το μέλος HugeG : 19-01-14 στις 16:58.

  3. #33
    Εγγραφή
    20-12-2005
    Μηνύματα
    3.229
    Downloads
    4
    Uploads
    0
    Τύπος
    VDSL2
    Ταχύτητα
    49997/4997
    ISP
    ΟΤΕ Conn-x
    DSLAM
    ΟΤΕ - ΞΑΝΘΗ
    Router
    Speedport W 724V
    SNR / Attn
    24,4(dB) / (dB)
    Παράθεση Αρχικό μήνυμα από Γιώργος Καραγιάννης Εμφάνιση μηνυμάτων
    1) Μια ερώτηση παιδιά. Πείτε ότι έχω δύο αρχεία file1 και file2 και θέλω να μεταφέρω τo περιεχόμενο από το ένα αρχείο στο άλλο χρησιμοποιώντας pascal, ποια εντολή χρησιμοποιώ;
    Ο κλασικός τρόπος είναι να ανοίξεις τα δύο αρχεία, και μετά να κάνεις readln από το ένα και writeln στο άλλο. Ανάλογα τώρα τι βιβλιοθήκες περιλαμβάνει ο compiler σου, υπάρχουν και έτοιμες λύσεις που το κάνουν κατευθείαν με μια συνάρτηση.
    Παράθεση Αρχικό μήνυμα από Γιώργος Καραγιάννης Εμφάνιση μηνυμάτων
    2) Ποια η διαφορά μεταξύ
    Κώδικας:
    end
    end.
    end;
    Η έκδοση με ερωτηματικό μπαίνει σε όλες τις κανονικές δηλώσεις όπως if, κτλ. Οι υπόλοιπες δύο μπαίνουν στις συναρτήσεις. Το σκέτο end μπαίνει σε όλες τις συναρτήσεις ενός προγράμματος εκτός από την κύρια και το end με τελεία μπαίνει μόνο στο τέλος της κύριας. Αν θυμάμαι καλά δηλαδή.
    "I like offending people, because I think people who get offended should be offended" - Linus Torvalds

    "Παλιά είχαμε φτωχούς οι οποίοι ζούσανε σε φτωχογειτονιές. Τώρα, η οικονομικά δυσπραγούσα τάξη
    κατέχει στέγες υποδεέστερης ποιότητας σε υποβαθμισμένα αστικά κέντρα" - George Carlin
    Γα.... την πολιτική ορθότητα.

  4. #34
    Εγγραφή
    11-03-2005
    Μηνύματα
    7.449
    Downloads
    24
    Uploads
    0
    Τύπος
    ADSL OTE
    Ταχύτητα
    24576/1024
    ISP
    OTEnet
    DSLAM
    ΟΤΕ - ΚΕΡΑΜΕΙΚΟΣ
    Router
    CISCO Systems K9 SMB
    Ο προγραμματισμός για μένα δεν έχει γλώσσα. Ο προγραμματιστής που μπορέι και γράφει σε μια γλώσσα αλλά δεν μπορέι να σκεφτεί χωρίς αυτήν για μένα προγραμματιστής ! Το να σκέφτεσαι και να γράφεις έτσι αλγοριθμικά είναι είναι ολόκληρη φιλοσοφία ! ! Η γλώσσα απλά είναι το εργαλείο μετάφρασης της σκέψης τους σε γραμμές ! Η Pascal σαν γλώσσα δεν έχει για μένα λόγο ύπαρξης πλέον παρά μόνο σαν εκπαιδευτικό εργαλείο ...Μάλιστα ο compier της γλωσσας που είχαν στα σχολεία είναι Pascal στα Ελληνικά ! Το Delphi όμως η το Lazarus (Open Source εκδοχή) είναι το εργαλείο που έχει χρήση ακόμα και σήμερα. Πολλά software είναι γραμμένα σε αυτό !

    Για μένα ασχολήσου με το Delphi-Lazarus αλλά περισσότερο κατάλαβε αυτό που έιπα ποιό πάνω !! Ετσι θα μεταπηδάς από γλώσσα εύκολα χωρίς να σε απασχολεί και πολύ ! Και το βασικότερο...Θα μπορείς να χρησιμοπιείς τα θετικά κάθε γλώσσας για υπέρ σου !

    Π.χ Εγώ πλέον γράφω σε .NET Το .ΝΕΤ έχει πολλές γλώσσες ! Το framework που έχω γράψει για τις δικές μου εφαρμογές είναι γραμμένο βέβαια σε C# και C++. Ομως όταν γράφω interfaces το περιβάλλον της εφαρμογής δηλαδή πάντα το γράφω σε VB. Δεν είχα ποτέ πρόβλημα με την κάθε γλώσσα ! Το ίδιο φυσικά μου βγαίνει ο κώδικας είτε γράφω VB (θεωριτικά γελοία γλώσσα) με την C++ (θεωριτικά δύσκολη γλώσσα). Παλιότερα σε εποχές VB6 έγραφα C++6/Assembly ώρες ώρες για κάποια πράγματα με VB6 μποστά !

    Τέλος π.χ h Basic σε σχέση με την Pascal είναι γλώσσα άναρχη ! Όπου θές δηλώνεις ότι θέλεις και δεν ασχολείσε ! Στην Pascal έχεις περιοχή δηλώσεων. Επειδή εμένα γενικά ο τρόπος που γράφεις στην Pascal μου αρέσει έφτιαξα ένα δικό μου τρόπος γραφής που βασίζετε στην Pascal αλλά προσαρζοσετε σε κάθε γλώσσα ! Π.χ Στο .NET δεν δηλώνω όπου να ναι πράγματα μέσα στον κώδικα .... Εχω συγκεκριμένα σημεία ! Αυτό σε βοηθάει πολύ στην ανάπτυξή σου !

    Στις 20 γραμμές δεν καταλαβαίνεις την αξία τους ...Στις 20.000 γραμμές εκεί να δείς !

    Οτι εγραλείο και αν επιλέξεις ...μάθε να σκέφτεσαι και μετά να γράφεις !

    Το lazarus λίγο που το είδα είναι ωραίο .....αν και δεν εχω γράψει ! Θα το έβαζα αλλά δεν έχω χρόνο αυτή την περίοδο ....

  5. #35
    Εγγραφή
    07-07-2013
    Περιοχή
    Παντού και πουθενά
    Μηνύματα
    477
    Downloads
    3
    Uploads
    0
    ISP
    ΟΤΕ Conn-x
    Router
    TD-W8960N
    Δεν μου αρέσει και ιδιαίτερα η pascal. Πιο πολύ θέλω να μάθω perl και python(ποια είναι η γνώμη σου για αυτές; ), απλά την pascal την θέλω κάτι για το σχολείο.

    - - - Updated - - -

    Εντάξει, αλλά μπορείς να μου πεις τι δηλώνουν, γιατί ψιλομπερδεύομαι;

  6. #36
    Εγγραφή
    11-03-2005
    Μηνύματα
    7.449
    Downloads
    24
    Uploads
    0
    Τύπος
    ADSL OTE
    Ταχύτητα
    24576/1024
    ISP
    OTEnet
    DSLAM
    ΟΤΕ - ΚΕΡΑΜΕΙΚΟΣ
    Router
    CISCO Systems K9 SMB
    Παράθεση Αρχικό μήνυμα από Γιώργος Καραγιάννης Εμφάνιση μηνυμάτων
    Δεν μου αρέσει και ιδιαίτερα η pascal. Πιο πολύ θέλω να μάθω perl και python(ποια είναι η γνώμη σου για αυτές; ), απλά την pascal την θέλω κάτι για το σχολείο.

    - - - Updated - - -

    Εντάξει, αλλά μπορείς να μου πεις τι δηλώνουν, γιατί ψιλομπερδεύομαι;
    Τι εννοείς ?

  7. #37
    Εγγραφή
    07-07-2013
    Περιοχή
    Παντού και πουθενά
    Μηνύματα
    477
    Downloads
    3
    Uploads
    0
    ISP
    ΟΤΕ Conn-x
    Router
    TD-W8960N
    Π.χ το write το βάζεις και δείχνει το μήνυμα που έβαλες μέσα στις παρενθέσεις.
    Write('Hello world');
    Ε, πότε μπαίνουν αυτά τα τρία end και τι κάνουν ξεχωριστά;

  8. #38
    Εγγραφή
    22-11-2002
    Ηλικία
    37
    Μηνύματα
    4.198
    Downloads
    3
    Uploads
    0
    Ταχύτητα
    17500/1024
    DSLAM
    Tellas - ΚΟΛΟΝΟΣ
    όσον αφορά τα end, 2 είναι αν θυμάμαι καλά
    end. όπου είναι στην ουσία το τέλος του κεντρικού προγράμματος (μία φορά δλδ θα γραψεις αυτό το end. )
    και το κανονικό end; μπαίνει κάθε φορά που θες να τελειώσεις ένα κομμάτι κώδικα που ξεκίνησες με ένα begin (χώρια του begin του κανονικού προγράμματος)

    BTW βάλε στην γραμμή 2
    Κώδικας:
    uses crt;
    πριν τις μεταβλητές

    Επίσης δεν είναι writeln() και readln() ?
    Χρησιμοποιώ Arch Linux. Εσύ; Δοκίμασε το δεν χάνεις και τίποτα :)
    Live CDs χωρίς να βγάλεις τα Windows: Ubuntu, OpenSUSE, Fedora.
    Για πιο ολοκληρωμένη άποψη συνιστάται εγκατάσταση και αρκετή χρήση. Το Linux ΔΕΝ είναι Windows :)
    Τί είναι το Linux ; δες εδώ και εδώ

    Paintball team Last Chancers

  9. #39
    Εγγραφή
    07-07-2013
    Περιοχή
    Παντού και πουθενά
    Μηνύματα
    477
    Downloads
    3
    Uploads
    0
    ISP
    ΟΤΕ Conn-x
    Router
    TD-W8960N
    Γεια που λες για το <<Επίσης δεν είναι writeln() και readln() ?>>
    Λες για το παράδειγμα με το Write('Hello world');;
    Εγώ είτε βάλω writeln είτε write το ίδιο μου βγάζει, χωρίς λάθη.

  10. #40
    Εγγραφή
    20-12-2005
    Μηνύματα
    3.229
    Downloads
    4
    Uploads
    0
    Τύπος
    VDSL2
    Ταχύτητα
    49997/4997
    ISP
    ΟΤΕ Conn-x
    DSLAM
    ΟΤΕ - ΞΑΝΘΗ
    Router
    Speedport W 724V
    SNR / Attn
    24,4(dB) / (dB)
    Παράθεση Αρχικό μήνυμα από JediMasterMANIAC Εμφάνιση μηνυμάτων
    Επίσης δεν είναι writeln() και readln() ?
    Παράθεση Αρχικό μήνυμα από Γιώργος Καραγιάννης Εμφάνιση μηνυμάτων
    Γεια που λες για το <<Επίσης δεν είναι writeln() και readln() ?>>
    Λες για το παράδειγμα με το Write('Hello world');;
    Εγώ είτε βάλω writeln είτε write το ίδιο μου βγάζει, χωρίς λάθη.
    Κώδικας:
    program mitsos;
    begin
    	Write('Hello');
    	Writeln('World');
    	Write('Test');
    end.
    
    Έξοδος:
    
    HelloWorld
    Test
    Το σκέτο Write δεν θα σου αλλάξει γραμμή δηλαδή.
    "I like offending people, because I think people who get offended should be offended" - Linus Torvalds

    "Παλιά είχαμε φτωχούς οι οποίοι ζούσανε σε φτωχογειτονιές. Τώρα, η οικονομικά δυσπραγούσα τάξη
    κατέχει στέγες υποδεέστερης ποιότητας σε υποβαθμισμένα αστικά κέντρα" - George Carlin
    Γα.... την πολιτική ορθότητα.

  11. #41
    Εγγραφή
    20-11-2006
    Ηλικία
    56
    Μηνύματα
    797
    Downloads
    0
    Uploads
    0
    Ταχύτητα
    14566/1006
    ISP
    HOL
    DSLAM
    HOL - ΑΘΗΝΑ
    Router
    Pirelli (λευκό)
    SNR / Attn
    9(dB) / 15(dB)
    Path Level
    Interleaved
    Πέρα από τα υπόλοιπα, κι από ότι θυμάμαι αμυδρά, στη στάνταρ Pascal υπάρχουν περιπτώσεις που το ; στο τέλος των statements είναι είτε προαιρετικό είτε απαγορευμένο.

    Για παράδειγμα, νομίζω πως πριν από else απαγορεύεται το ; ενώ πριν από end είναι προαιρετικό (ή κάτι τέτοιο, δεν τα θυμάμαι ακριβώς). Η ουσία είναι πως έπρεπε να έχεις το νου σου και στο πότε θα βάλεις ; και πότε όχι.

    ΥΓ. Πιθανόν οι μοντέρνες εκδόσεις της γλώσσας να έχουν ομογενοποιήσει καλύτερα τη χρήση του ;

  12. #42
    Εγγραφή
    07-02-2005
    Ηλικία
    44
    Μηνύματα
    561
    Downloads
    0
    Uploads
    0
    Τύπος
    ADSL2+ Vivodi Full
    Ταχύτητα
    16384/1024
    ISP
    Vivodi
    DSLAM
    Vivodi - ΑΘΗΝΑΣ
    Router
    Speedtouch 780
    Παράθεση Αρχικό μήνυμα από Γιώργος Καραγιάννης Εμφάνιση μηνυμάτων
    1) Μια ερώτηση παιδιά. Πείτε ότι έχω δύο αρχεία file1 και file2 και θέλω να μεταφέρω τo περιεχόμενο από το ένα αρχείο στο άλλο χρησιμοποιώντας pascal, ποια εντολή χρησιμοποιώ;
    2) Ποια η διαφορά μεταξύ
    Κώδικας:
    end
    end.
    end;
    1) Το end. μπαίνει μόνο στο τέλος του προγράμματος καοί πουθενά αλλού. Είναι πάντα η τελευταία γραμμή.

    2) Το end; μπαίνει οπουδήποτε αλλού (εκτός από την περίπτωση 3)

    3) Το end μπαίνει όταν αμέσως μετά ακολουθεί else.
    Παράθεση Παράθεση Posted from Android app

  13. #43
    Εγγραφή
    07-07-2013
    Περιοχή
    Παντού και πουθενά
    Μηνύματα
    477
    Downloads
    3
    Uploads
    0
    ISP
    ΟΤΕ Conn-x
    Router
    TD-W8960N
    Ευχαριστώ παιδιά για την βοήθειά σας.

Σελ. 3 από 3 ΠρώτηΠρώτη 123

Tags για αυτό το Θέμα

Bookmarks

Bookmarks

Δικαιώματα - Επιλογές

  • Δεν μπορείτε να δημοσιεύσετε νέα θέματα
  • Δεν μπορείτε να δημοσιεύσετε νέα μηνύματα
  • Δεν μπορείτε να αναρτήσετε συνημμένα
  • Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας
  •  
  • Τα BB code είναι σε λειτουργία
  • Τα Smilies είναι σε λειτουργία
  • Το [IMG] είναι σε λειτουργία
  • Το [VIDEO] είναι σε λειτουργία
  • Το HTML είναι εκτός λειτουργίας