Pascal

...ασύγχρονα μαθήματα από τους guru της κοινότητας

Συντονιστής: the_eye

Pascal

Δημοσίευσηαπό saviolidis » 07 Νοέμ 2011, 15:36

Ότι μαθαίνω στο σχολείο το γράφω!
http://freepascal.weebly.com
1 Γνώσεις → Linux: Μέτριος ┃ Προγραμματισμός: Pascal ┃ Αγγλικά: Προχωρημένος
2 Λειτουργικό → Ubuntu 11.10 Oneiric Ocelot (Gnome Shell) 32-bit (en_US.utf8)
3 Προδιαγραφές → CPU: 2x Intel Atom CPU N450 1.66GHz ‖ RAM 965 MiB ‖ Hewlett-Packard 3660 - Hewlett-Packard HP Mini 210-1000
4 Κάρτες γραφικών: Intel N10 Family Integrated Graphics Controller ⎨8086:a011⎬
Η ιστοσελίδα μου: http://www.hiphopistas.weebly.com
Άβαταρ μέλους
saviolidis
punkTUX
punkTUX
 
Δημοσιεύσεις: 225
Εγγραφή: 16 Μαρ 2011, 00:11
Τοποθεσία: Σίφνος
IRC: Savio
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό clepto » 07 Νοέμ 2011, 15:38

ωραίος! και ωραίο wallpaper :P
1 Γνώσεις Linux: Ικανοποιητικό ┃ Προγραμματισμού: Ικανοποιητικό ┃ Αγγλικών: Ικανοποιητικό
2 Ubuntu 13.04 raring 3.8.0-30-generic 64bit (en_US.UTF-8, Unity ubuntu), Ubuntu 3.8.0-19-generic, Windows 7
3 Intel Core i7-3537U CPU @ 2.00GHz ‖ RAM 3840 MiB ‖ ASUS K56CB
4 Intel 3rd Gen Core processor Graphics Controller [8086:0166] {i915}
5 wlan0: Atheros Inc. AR9485 Wireless Network Adapter [168c:0032] (rev 01) ⋮ eth0: Realtek RTL8111/8168 PCI Express Gigabit Ethernet controller [10ec:8168] (rev 0a)
clepto
antiwinTUX
antiwinTUX
 
Δημοσιεύσεις: 4102
Εγγραφή: 07 Ιαν 2010, 16:27
Τοποθεσία: Πάτρα
Launchpad: christriant
IRC: Clepto
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό saviolidis » 07 Νοέμ 2011, 15:40

Ευχαριστώ :)
1 Γνώσεις → Linux: Μέτριος ┃ Προγραμματισμός: Pascal ┃ Αγγλικά: Προχωρημένος
2 Λειτουργικό → Ubuntu 11.10 Oneiric Ocelot (Gnome Shell) 32-bit (en_US.utf8)
3 Προδιαγραφές → CPU: 2x Intel Atom CPU N450 1.66GHz ‖ RAM 965 MiB ‖ Hewlett-Packard 3660 - Hewlett-Packard HP Mini 210-1000
4 Κάρτες γραφικών: Intel N10 Family Integrated Graphics Controller ⎨8086:a011⎬
Η ιστοσελίδα μου: http://www.hiphopistas.weebly.com
Άβαταρ μέλους
saviolidis
punkTUX
punkTUX
 
Δημοσιεύσεις: 225
Εγγραφή: 16 Μαρ 2011, 00:11
Τοποθεσία: Σίφνος
IRC: Savio
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό lucinos » 08 Νοέμ 2011, 10:12

Ωραίος, αν και προσωπικά έχω πολύ κακή γνώμη για την Pascal. Συγκεκριμένα πιστεύω ότι οι διερμηνευόμενες γλώσσες (πχ Python) θα έπρεπε να προτιμούνται ενώ όταν δεν είναι ικανοποιητικές δεν υπάρχει λόγος κάποιος να αποφύγει να πάει σε μια πραγματικά ισχυρή γλώσσα όπως η C++
Spoiler: show
Γνώσεις → Linux: Μέτριος ┃ Προγραμματισμός: Μέτριος ┃ Αγγλικά: Μέτριος
Λειτουργικό → Ubuntu 11.04 natty 64-bit (el_GR.UTF-8)
Προδιαγραφές → CPU: 4x Intel Core i5 CPU 750 2.67GHz ‖ RAM 3953 MiB ‖ ASRock P55DE3
Κάρτες γραφικών: nVidia G92 [GeForce GTS 250] ⎨10de:0615⎬ (rev a2)
Δίκτυα: eth0: Realtek RTL8111/8168B PCI Express Gigabit Ethernet controller ⎨10ec:8168⎬ (rev 03)
Άβαταρ μέλους
lucinos
daemonTUX
daemonTUX
 
Δημοσιεύσεις: 828
Εγγραφή: 12 Δεκ 2010, 22:04
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό clepto » 08 Νοέμ 2011, 15:42

να ρωτήσω, από που διαβάσεις pascal;
1 Γνώσεις Linux: Ικανοποιητικό ┃ Προγραμματισμού: Ικανοποιητικό ┃ Αγγλικών: Ικανοποιητικό
2 Ubuntu 13.04 raring 3.8.0-30-generic 64bit (en_US.UTF-8, Unity ubuntu), Ubuntu 3.8.0-19-generic, Windows 7
3 Intel Core i7-3537U CPU @ 2.00GHz ‖ RAM 3840 MiB ‖ ASUS K56CB
4 Intel 3rd Gen Core processor Graphics Controller [8086:0166] {i915}
5 wlan0: Atheros Inc. AR9485 Wireless Network Adapter [168c:0032] (rev 01) ⋮ eth0: Realtek RTL8111/8168 PCI Express Gigabit Ethernet controller [10ec:8168] (rev 0a)
clepto
antiwinTUX
antiwinTUX
 
Δημοσιεύσεις: 4102
Εγγραφή: 07 Ιαν 2010, 16:27
Τοποθεσία: Πάτρα
Launchpad: christriant
IRC: Clepto
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό saviolidis » 09 Νοέμ 2011, 15:15

Στο σχολείο μαθαίνω τώρα Pascal, τα πρώτα μου βήματα στον προγραμματισμό! Και ναι αργότερα όταν θα έχω μπει στο παιχνίδι η πρώτη γλώσσα που θέλω να μάθω είναι η Python και η Java!
1 Γνώσεις → Linux: Μέτριος ┃ Προγραμματισμός: Pascal ┃ Αγγλικά: Προχωρημένος
2 Λειτουργικό → Ubuntu 11.10 Oneiric Ocelot (Gnome Shell) 32-bit (en_US.utf8)
3 Προδιαγραφές → CPU: 2x Intel Atom CPU N450 1.66GHz ‖ RAM 965 MiB ‖ Hewlett-Packard 3660 - Hewlett-Packard HP Mini 210-1000
4 Κάρτες γραφικών: Intel N10 Family Integrated Graphics Controller ⎨8086:a011⎬
Η ιστοσελίδα μου: http://www.hiphopistas.weebly.com
Άβαταρ μέλους
saviolidis
punkTUX
punkTUX
 
Δημοσιεύσεις: 225
Εγγραφή: 16 Μαρ 2011, 00:11
Τοποθεσία: Σίφνος
IRC: Savio
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό linuxs » 09 Νοέμ 2011, 22:34

Απίστευτη καλή επιλογή για πρώτη γλώσσα...
Αν το πρόβλημά μας επιλυθεί. Επιλέγουμε το θέμα που βοήθησε στην επίλυση και πατάμε το κουμπάκι Εικόνα.
Γνώσεις ⇛ Linux: Μέτριο┃Προγραμματισμός: C┃Αγγλικά: Καλά
Λειτουργικό ⇛ Linux Ubuntu 10.4 LTS
Προδιαγραφές ⇛ Intel Pentium @T4500 2.3GHz│ 512GB VRAM│ 500 HDD│ ATI RADEON HD545v 512 MB │ Screen: 15.6''
Άβαταρ μέλους
linuxs
daemonTUX
daemonTUX
 
Δημοσιεύσεις: 1060
Εγγραφή: 02 Ιούλ 2010, 13:19
Τοποθεσία: GR
IRC: linuxs
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό saviolidis » 28 Νοέμ 2011, 15:05

Η Python αξίζει πάρα πολύ στον προγραμματισμό, δεν υπάρχει άνθρωπος που να μου το έχει αμφισβητήσει μέχρι στιγμής! ;)
1 Γνώσεις → Linux: Μέτριος ┃ Προγραμματισμός: Pascal ┃ Αγγλικά: Προχωρημένος
2 Λειτουργικό → Ubuntu 11.10 Oneiric Ocelot (Gnome Shell) 32-bit (en_US.utf8)
3 Προδιαγραφές → CPU: 2x Intel Atom CPU N450 1.66GHz ‖ RAM 965 MiB ‖ Hewlett-Packard 3660 - Hewlett-Packard HP Mini 210-1000
4 Κάρτες γραφικών: Intel N10 Family Integrated Graphics Controller ⎨8086:a011⎬
Η ιστοσελίδα μου: http://www.hiphopistas.weebly.com
Άβαταρ μέλους
saviolidis
punkTUX
punkTUX
 
Δημοσιεύσεις: 225
Εγγραφή: 16 Μαρ 2011, 00:11
Τοποθεσία: Σίφνος
IRC: Savio
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό saviolidis » 09 Δεκ 2011, 01:30

Παιδιά βοήθεια!!!
Φτιάχνω ένα μικρό πρόγραμμα για το σχολείο αύριο και έχω κολλήσει!
Εδώ είναι ο κώδικας:
Κώδικας: Επιλογή όλων
program vathmologia;
uses crt;
var
student : String;
vathmos : LongInt;
begin
   write('Δώσε το όνομα του μαθητή: ');
   readln(student);
   write('Δώσε την τελική βαθμολογία του μαθητή: ');
   readln(vathmos);
   if vathmos<10
   then begin
      writeln('Είσαι κάτω από την βάση!');
      if vathmos<9
      then begin
         writeln('Μάλλον κόβεσαι!');
      end
      else if vathmos>=9
      then begin
         writeln('Μάλλον περνάς με τον μέσο όρο!');
      end;
   end
   [b]else if 10<vathmos<15[/b]
   then begin
      writeln('Καλά τα πήγες αλλά προσπάθησε περισσότερο!');
   end
   else if vathmos>=15
   then begin
      writeln('Μπράβο!!!');
   end;
end.
      


Λοιπόν εκεί που έχω κάνει την έντονη γραφή, όταν το κάνω Compile το πρόγραμμα μου βγάζει λάθος...Τι να γράψω για να πω ότι αν ο βαθμός είναι μεγαλύτερος από 10 και μικρότερος από 15 και μπλα μπλα μπλα;...
1 Γνώσεις → Linux: Μέτριος ┃ Προγραμματισμός: Pascal ┃ Αγγλικά: Προχωρημένος
2 Λειτουργικό → Ubuntu 11.10 Oneiric Ocelot (Gnome Shell) 32-bit (en_US.utf8)
3 Προδιαγραφές → CPU: 2x Intel Atom CPU N450 1.66GHz ‖ RAM 965 MiB ‖ Hewlett-Packard 3660 - Hewlett-Packard HP Mini 210-1000
4 Κάρτες γραφικών: Intel N10 Family Integrated Graphics Controller ⎨8086:a011⎬
Η ιστοσελίδα μου: http://www.hiphopistas.weebly.com
Άβαταρ μέλους
saviolidis
punkTUX
punkTUX
 
Δημοσιεύσεις: 225
Εγγραφή: 16 Μαρ 2011, 00:11
Τοποθεσία: Σίφνος
IRC: Savio
Εκτύπωση

Re: Pascal

Δημοσίευσηαπό parenthesis » 09 Δεκ 2011, 01:58

saviolidis έγραψε:Παιδιά βοήθεια!!!
Φτιάχνω ένα μικρό πρόγραμμα για το σχολείο αύριο και έχω κολλήσει!
Εδώ είναι ο κώδικας:
Κώδικας: Επιλογή όλων
program vathmologia;
uses crt;
var
student : String;
vathmos : LongInt;
begin
   write('Δώσε το όνομα του μαθητή: ');
   readln(student);
   write('Δώσε την τελική βαθμολογία του μαθητή: ');
   readln(vathmos);
   if vathmos<10
   then begin
      writeln('Είσαι κάτω από την βάση!');
      if vathmos<9
      then begin
         writeln('Μάλλον κόβεσαι!');
      end
      else if vathmos>=9
      then begin
         writeln('Μάλλον περνάς με τον μέσο όρο!');
      end;
   end
   [b]else if 10<vathmos<15[/b]
   then begin
      writeln('Καλά τα πήγες αλλά προσπάθησε περισσότερο!');
   end
   else if vathmos>=15
   then begin
      writeln('Μπράβο!!!');
   end;
end.
      


Λοιπόν εκεί που έχω κάνει την έντονη γραφή, όταν το κάνω Compile το πρόγραμμα μου βγάζει λάθος...Τι να γράψω για να πω ότι αν ο βαθμός είναι μεγαλύτερος από 10 και μικρότερος από 15 και μπλα μπλα μπλα;...


Έχω να πιάσω pascal κάτι χρόνια, αλλά νομίζω ότι μάλλον χρειάζεσαι τον λογικό τελεστή AND, δηλ κάπως έτσι:

Κώδικας: Επιλογή όλων
...
else if (vathmos > 10) AND (vathmos < 15) then
...


έχει και παράδειγμα εδώ : http://pascal-programming.info/lesson6.php#Jump7
1 Γνώσεις Linux: Πρώτα βήματα ┃ Προγραμματισμού: Ικανοποιητικό ┃ Αγγλικών: Πολύ καλό
2 Dual boot:
  • Ubuntu 13.04 raring 3.8.0-34-generic 64bit (el_GR.UTF-8, Unity ubuntu), Ubuntu 3.8.0-19-generic
  • Fedora 19 Schrödinger’s Cat 3.13.5-101.fc19.x86_64 64bit (el_GR.utf8, gnome)
3 Intel Core i5-3337U CPU @ 1.80GHz ‖ RAM 3844 MiB ‖ TOSHIBA VCUAA - TOSHIBA SATELLITE U940
4 Intel 3rd Gen Core processor Graphics Controller [8086:0166] {i915}
5 eth0: Realtek RTL8101E/RTL8102E Ethernet [10ec:8136] (rev 05) ⋮ wlan0: Intel Centrino Wireless-N 2230 [8086:0887] (rev c4)
Άβαταρ μέλους
parenthesis
punkTUX
punkTUX
 
Δημοσιεύσεις: 150
Εγγραφή: 06 Οκτ 2009, 22:47
Launchpad: mara_sdr
Εκτύπωση

Επόμενο

Επιστροφή στο Το Σχολείο του Φόρουμ - Ασύγχρονα Μαθήματα

cron