Πως θα βάλω ρίζα;  Το θέμα επιλύθηκε

...IDE, compilers, κλπ

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

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό yodan000 » 03 Σεπ 2010, 14:59

ναι... αυτό μου βγάζει Runtime error 207 at $080481E6
$080481E6
$080620B7
επίσης ξέρεις που μπορώ να βρω το αρχείο να το τροποποιήσω αν θέλω; γιατί όταν το κάνω compile μου βγάζει 2 αρχεία το ένα το τρέχω από τερματικό και ένα άλλο με κατάληξη .ο αλλά δεν μπορώ να το ανοίξω...
1 Linux: Μέτριος ┃ Προγραμματισμός: Καθόλου ┃ Αγγλικά: Προχωρημένος
2 Ubuntu Gnome τελευταία έκδοση
3 Intel Core i3 CPU M 370 2.40GHz ‖ RAM 3819 MiB ‖ Acer Aspire 5742G
4 NVIDIA Corporation Device [10de:0df1] (rev a1)
5 eth0: Broadcom NetLink BCM57780 Gigabit Ethernet PCIe [14e4:1692] (rev 01) ⋮ wlan0: Atheros Inc. AR9287 Wireless Network Adapter (PCI-Express) [168c:002e] (rev 01)
yodan000
saintTUX
saintTUX
 
Δημοσιεύσεις: 1681
Εγγραφή: 12 Ιαν 2010, 00:32
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό hlias » 03 Σεπ 2010, 15:04

Το αρχείο με τον κώδικα έχει κατάληξη .pas.
Ο geany είναι ένας καλός text editor και έχει και μορφοποίηση για pascal. Βασικά ο geany είναι IDE.
Μπορείς να μου δώσεις τον κώδικα να τον τρέξω εδώ να δω αν βγάζει πρόβλημα;
Γνώσεις ⇛ Linux: Κανονικό ┃ Προγραμματισμός: Μέτρια ┃ Αγγλικά: Καλά
Λειτουργικό ⇛ ubuntu 11.04 32bit σε Netbook HP Mini 210
Προδιαγραφές ⇛ Intel Atom(R) N450 1.66GHz │ 1GB RAM │ Broadcom 4312 │ Intel GMA 3150 │
hlias
punkTUX
punkTUX
 
Δημοσιεύσεις: 193
Εγγραφή: 02 Νοέμ 2009, 17:05
Τοποθεσία: Ξάνθη, Θράκη
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό yodan000 » 03 Σεπ 2010, 16:06

εμένα δεν μου βγάζει τπτ τέτοιο.... το φτιάχνω στο gedit και μετά εξαφανίζεται.....
1 Linux: Μέτριος ┃ Προγραμματισμός: Καθόλου ┃ Αγγλικά: Προχωρημένος
2 Ubuntu Gnome τελευταία έκδοση
3 Intel Core i3 CPU M 370 2.40GHz ‖ RAM 3819 MiB ‖ Acer Aspire 5742G
4 NVIDIA Corporation Device [10de:0df1] (rev a1)
5 eth0: Broadcom NetLink BCM57780 Gigabit Ethernet PCIe [14e4:1692] (rev 01) ⋮ wlan0: Atheros Inc. AR9287 Wireless Network Adapter (PCI-Express) [168c:002e] (rev 01)
yodan000
saintTUX
saintTUX
 
Δημοσιεύσεις: 1681
Εγγραφή: 12 Ιαν 2010, 00:32
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό yodan000 » 03 Σεπ 2010, 16:12

λοιπόν αυτό γράφω....
Κώδικας: Επιλογή όλων
program hi(input,output);
var a,b,c,d,o,n:real;
begin;
writeln('Δώσε τον α');
readln(a);
writeln('Δώσε τον β');
readln(b);
writeln('Δώσε τον γ');
readln(c);
d:=b*b-4*a*c;
o:=(-b+sqtr(d))/2*a;
n:=(-b-sqtr(d))/2*a;
writeln('Οι ρίζες της εξίσωσης είναι' , o:0:2 , 'και' , n:0:2);
end.
1 Linux: Μέτριος ┃ Προγραμματισμός: Καθόλου ┃ Αγγλικά: Προχωρημένος
2 Ubuntu Gnome τελευταία έκδοση
3 Intel Core i3 CPU M 370 2.40GHz ‖ RAM 3819 MiB ‖ Acer Aspire 5742G
4 NVIDIA Corporation Device [10de:0df1] (rev a1)
5 eth0: Broadcom NetLink BCM57780 Gigabit Ethernet PCIe [14e4:1692] (rev 01) ⋮ wlan0: Atheros Inc. AR9287 Wireless Network Adapter (PCI-Express) [168c:002e] (rev 01)
yodan000
saintTUX
saintTUX
 
Δημοσιεύσεις: 1681
Εγγραφή: 12 Ιαν 2010, 00:32
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό hlias » 03 Σεπ 2010, 16:54

Έχεις λάθος στην συνάρτηση ρίζας. Λες sqtr() ενώ είναι sqrt().
Το λάθος είναι στην διακρίνουσα!!! Με τους αριθμούς που βάζεις η διακρίνουσα βγαίνει αρνητική και όπως είναι γνωστόν, ρίζα αρνητικού αριθμού δεν υπάρχει οπότε να όλο το πρόγραμμα:
Κώδικας: Επιλογή όλων
program hi(input,output);
var a,b,c,d,o,n:real;
begin;
write('Δώσε τον α :');
readln(a);
write('Δώσε τον β :');
readln(b);
write('Δώσε τον γ :');
readln(c);
d:=(sqr(b)-4*a*c);
writeln('Διακρίνουσα:',d:0:2);
if d > 0 then
begin
o:=((-b+sqrt(d))/2*a);
n:=((-b-sqrt(d))/2*a);
writeln('Οι ρίζες της εξίσωσης είναι' , o:0:2 , ' και' , n:0:2);
end
else if d = 0 then
writeln('Η διπλή λύση της εξίσωσης είναι:', (-b/2*a):0:2)
else
writeln('Δεν υπάρχει λύση!');
end.


sqr()= ύψωση εις το τετράγωνο.
sqrt()= ρίζα

yodan000 έγραψε:εμένα δεν μου βγάζει τπτ τέτοιο.... το φτιάχνω στο gedit και μετά εξαφανίζεται.....

Κατέβασε τον geany!
sudo apt-get install geany
Γνώσεις ⇛ Linux: Κανονικό ┃ Προγραμματισμός: Μέτρια ┃ Αγγλικά: Καλά
Λειτουργικό ⇛ ubuntu 11.04 32bit σε Netbook HP Mini 210
Προδιαγραφές ⇛ Intel Atom(R) N450 1.66GHz │ 1GB RAM │ Broadcom 4312 │ Intel GMA 3150 │
hlias
punkTUX
punkTUX
 
Δημοσιεύσεις: 193
Εγγραφή: 02 Νοέμ 2009, 17:05
Τοποθεσία: Ξάνθη, Θράκη
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό yodan000 » 03 Σεπ 2010, 18:18

οκ θα το κατεβάσω το βράδυ.... για αυτό δεν έβγαινε.... στην τύχη έβαζα τα νούμερα.... αυτό πάντως με τα if θα τα αφήσω για αργότερα... να διαβάσω το βιβλίο και βλέπουμε....
1 Linux: Μέτριος ┃ Προγραμματισμός: Καθόλου ┃ Αγγλικά: Προχωρημένος
2 Ubuntu Gnome τελευταία έκδοση
3 Intel Core i3 CPU M 370 2.40GHz ‖ RAM 3819 MiB ‖ Acer Aspire 5742G
4 NVIDIA Corporation Device [10de:0df1] (rev a1)
5 eth0: Broadcom NetLink BCM57780 Gigabit Ethernet PCIe [14e4:1692] (rev 01) ⋮ wlan0: Atheros Inc. AR9287 Wireless Network Adapter (PCI-Express) [168c:002e] (rev 01)
yodan000
saintTUX
saintTUX
 
Δημοσιεύσεις: 1681
Εγγραφή: 12 Ιαν 2010, 00:32
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό yodan000 » 04 Σεπ 2010, 23:46

λοιπόν εγκατέστησα το geany αλλά δεν ξέρω τι ακριβώς να κάνω.... δημιουργό το πρόγραμμα το αποθηκεύω αλλά μετά δεν μπορώ να πατήσω build ή μεταγλώττιση πως ακριβώς δουλεύει;
1 Linux: Μέτριος ┃ Προγραμματισμός: Καθόλου ┃ Αγγλικά: Προχωρημένος
2 Ubuntu Gnome τελευταία έκδοση
3 Intel Core i3 CPU M 370 2.40GHz ‖ RAM 3819 MiB ‖ Acer Aspire 5742G
4 NVIDIA Corporation Device [10de:0df1] (rev a1)
5 eth0: Broadcom NetLink BCM57780 Gigabit Ethernet PCIe [14e4:1692] (rev 01) ⋮ wlan0: Atheros Inc. AR9287 Wireless Network Adapter (PCI-Express) [168c:002e] (rev 01)
yodan000
saintTUX
saintTUX
 
Δημοσιεύσεις: 1681
Εγγραφή: 12 Ιαν 2010, 00:32
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό hlias » 05 Σεπ 2010, 07:11

Αυτή τη στιγμή είμαι σε κατάσταση μέθης, οπώτε, αύριο το πρωί(απόγευμα υπολόγιζε εσύ) ο bootloader μου θα μου πει να σου απαντήσω!


Πρέπει πρώτα να το αποθηκεύσεις και μετά να το κάνεις compile.
Γνώσεις ⇛ Linux: Κανονικό ┃ Προγραμματισμός: Μέτρια ┃ Αγγλικά: Καλά
Λειτουργικό ⇛ ubuntu 11.04 32bit σε Netbook HP Mini 210
Προδιαγραφές ⇛ Intel Atom(R) N450 1.66GHz │ 1GB RAM │ Broadcom 4312 │ Intel GMA 3150 │
hlias
punkTUX
punkTUX
 
Δημοσιεύσεις: 193
Εγγραφή: 02 Νοέμ 2009, 17:05
Τοποθεσία: Ξάνθη, Θράκη
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό yodan000 » 05 Σεπ 2010, 15:02

το αποθηκεύω αλλά δεν μου βγάζει επιλογή για compile
1 Linux: Μέτριος ┃ Προγραμματισμός: Καθόλου ┃ Αγγλικά: Προχωρημένος
2 Ubuntu Gnome τελευταία έκδοση
3 Intel Core i3 CPU M 370 2.40GHz ‖ RAM 3819 MiB ‖ Acer Aspire 5742G
4 NVIDIA Corporation Device [10de:0df1] (rev a1)
5 eth0: Broadcom NetLink BCM57780 Gigabit Ethernet PCIe [14e4:1692] (rev 01) ⋮ wlan0: Atheros Inc. AR9287 Wireless Network Adapter (PCI-Express) [168c:002e] (rev 01)
yodan000
saintTUX
saintTUX
 
Δημοσιεύσεις: 1681
Εγγραφή: 12 Ιαν 2010, 00:32
Εκτύπωση

Re: Πως θα βάλω ρίζα;

Δημοσίευσηαπό hlias » 05 Σεπ 2010, 15:40

1)


Αφού κάνεις αποθήκευση,

2)
Γνώσεις ⇛ Linux: Κανονικό ┃ Προγραμματισμός: Μέτρια ┃ Αγγλικά: Καλά
Λειτουργικό ⇛ ubuntu 11.04 32bit σε Netbook HP Mini 210
Προδιαγραφές ⇛ Intel Atom(R) N450 1.66GHz │ 1GB RAM │ Broadcom 4312 │ Intel GMA 3150 │
hlias
punkTUX
punkTUX
 
Δημοσιεύσεις: 193
Εγγραφή: 02 Νοέμ 2009, 17:05
Τοποθεσία: Ξάνθη, Θράκη
Εκτύπωση

ΠροηγούμενηΕπόμενο

Επιστροφή στο Εφαρμογές για Ανάπτυξη Λογισμικού