Τώρα είναι Πέμ 27 Φεβ 2020 07:26 pm

Όλοι οι χρόνοι είναι UTC + 2 ώρες [ DST ]




Δημιουργία νέου θέματος Απαντήστε στο θέμα  [ 5 Δημοσιεύσεις ] 
Συγγραφέας Μήνυμα
ΔημοσίευσηΔημοσιεύτηκε: Παρ 22 Φεβ 2008 10:04 pm 
Χωρίς σύνδεση

Εγγραφή: Παρ 22 Φεβ 2008 04:17 pm
Δημοσιεύσεις: 3
Τοποθεσία: Xanthi
Syntax: [ Download ] [ Hide ]
ΠΡΟΓΡΑΜΜΑ Κύκλος

ΜΕΤΑΒΛΗΤΕΣ
  ΠΡΑΓΜΑΤΙΚΕΣ:Α, Β, Γ, Ζ
ΑΡΧΗ
  ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
    ΓΡΑΨΕ
    ΓΡΑΨΕ 'Ο τύπος του κύκλου πρέπει να είναι σε μορφή χ^2+ψ^2+Αχ+Βψ+Γ=0'
    ΓΡΑΨΕ 'Δώσε την τιμή του Α'
    ΔΙΑΒΑΣΕ Α
    ΓΡΑΨΕ 'Δώσε την τιμή του Β'
    ΔΙΑΒΑΣΕ Β
    ΓΡΑΨΕ 'Δώσε την τιμή του Γ'
    ΔΙΑΒΑΣΕ Γ
    ΓΡΑΨΕ
    Ζ <-- Α^2+Β^2-4*Γ
    ΓΡΑΨΕ 'Ζ =', Α^2+Β^2-4*Γ
    ΓΡΑΨΕ
    ΑΝ Ζ<0 ΤΟΤΕ
      ΓΡΑΨΕ 'Δεν υπάρχει κύκλος'
    ΑΛΛΙΩΣ_ΑΝ Ζ>0 ΤΟΤΕ
      ΓΡΑΨΕ 'Η εξίσωση παριστάνει κύκλο'
      ΓΡΑΨΕ
      ΓΡΑΨΕ 'Με ακτίνα =', (Τ_Ρ(Ζ))/2
      ΓΡΑΨΕ
      ΓΡΑΨΕ 'Κέντρο με συντεταγμένες', 'Χο =',(-Α)/2, 'Ψο =', (-Β)/2
    ΑΛΛΙΩΣ_ΑΝ Ζ=0 ΤΟΤΕ
      ΓΡΑΨΕ 'Παριστάνει σημείο με συντεταγμένες', 'Χο =',(-Α)/2, 'Ψο =', (-Β)/2
      ΓΡΑΨΕ
    ΤΕΛΟΣ_ΑΝ
  ΜΕΧΡΙΣ_ΟΤΟΥ Ζ=123456789
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

_________________
Mitkof!!


Κορυφή
 Προφίλ  
 
ΔημοσίευσηΔημοσιεύτηκε: Κυρ 24 Φεβ 2008 11:45 pm 
Χωρίς σύνδεση

Εγγραφή: Δευτ 22 Οκτ 2007 12:46 pm
Δημοσιεύσεις: 15
για ποιο λόγο έχεις βάλει την εντολή αυτή:
Syntax: [ Download ] [ Hide ]
ΜΕΧΡΙΣ_ΟΤΟΥ Ζ=123456789


Κορυφή
 Προφίλ  
 
ΔημοσίευσηΔημοσιεύτηκε: Τετ 27 Φεβ 2008 02:20 pm 
Χωρίς σύνδεση

Εγγραφή: Παρ 22 Φεβ 2008 04:17 pm
Δημοσιεύσεις: 3
Τοποθεσία: Xanthi
periptero έγραψε:
για ποιο λόγο έχεις βάλει την εντολή αυτή:
Syntax: [ Download ] [ Hide ]
ΜΕΧΡΙΣ_ΟΤΟΥ Ζ=123456789


gia to logo oti eimai akoma arxarios k den mou hrthe allh idea pws na to kanw epanalipsh xwris na valw auton ton periorisno.Mhpws exeis kamia idea pws?

_________________
Mitkof!!


Κορυφή
 Προφίλ  
 
ΔημοσίευσηΔημοσιεύτηκε: Τετ 27 Φεβ 2008 03:24 pm 
Χωρίς σύνδεση

Εγγραφή: Δευτ 22 Οκτ 2007 12:46 pm
Δημοσιεύσεις: 15
mitkof6 έγραψε:
periptero έγραψε:
για ποιο λόγο έχεις βάλει την εντολή αυτή:
Syntax: [ Download ] [ Hide ]
ΜΕΧΡΙΣ_ΟΤΟΥ Ζ=123456789


gia to logo oti eimai akoma arxarios k den mou hrthe allh idea pws na to kanw epanalipsh xwris na valw auton ton periorisno.Mhpws exeis kamia idea pws?



gia dokimase to parakato
Syntax: [ Download ] [ Hide ]
ΧΑΡΑΚΤΗΡΕΣ: APANTHSH

ΓΡΑΨΕ ' THELEIS NA SYNEXISEIS ( NAI H OXI)'
ΔΙΑΒΑΣΕ APANTHSH
ΜΕΧΡΙΣ_ΟΤΟΥ ΑΠΑΝΤΗΣΗ='ΟΧΙ'
 


thn proth grammh tha thn valeis stis dhloseis ton metablhton.
Ta ypoloipa sto telos anti gia thn entolh
ΜΕΧΡΙΣ_ΟΤΟΥ Ζ=123456789
apla ean to oxi to exeis me aglgikous xarakthres na to grafeis me agglikous xarakthres kai to idio an to exeis me ellhnikous xarakthres.
Elpizo na voithisa.


Κορυφή
 Προφίλ  
 
ΔημοσίευσηΔημοσιεύτηκε: Δευτ 03 Μαρ 2008 10:39 pm 
Χωρίς σύνδεση

Εγγραφή: Παρ 22 Φεβ 2008 04:17 pm
Δημοσιεύσεις: 3
Τοποθεσία: Xanthi
euxaristw polu

_________________
Mitkof!!


Κορυφή
 Προφίλ  
 
Τελευταίες δημοσιεύσεις:  Ταξινόμηση ανά  
Δημιουργία νέου θέματος Απαντήστε στο θέμα  [ 5 Δημοσιεύσεις ] 

Όλοι οι χρόνοι είναι UTC + 2 ώρες [ DST ]


Μέλη σε σύνδεση

Μέλη σε αυτή την Δ. Συζήτηση : Δεν υπάρχουν εγγεγραμμένα μέλη και 1 επισκέπτης


Δεν μπορείτε να δημοσιεύετε νέα θέματα σε αυτή τη Δ. Συζήτηση
Δεν μπορείτε να απαντάτε σε θέματα σε αυτή τη Δ. Συζήτηση
Δεν μπορείτε να επεξεργάζεστε τις δημοσιεύσεις σας σε αυτή τη Δ. Συζήτηση
Δεν μπορείτε να διαγράφετε τις δημοσιεύσεις σας σε αυτή τη Δ. Συζήτηση
Δεν μπορείτε να επισυνάπτετε αρχεία σε αυτή τη Δ. Συζήτηση

Αναζήτηση για:
Μετάβαση σε:  
cron
Προβολές σελίδων: website counters