ΠΡΟΓΡΑΜΜΑ Πυθαγόρειο_Θεώρημα
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: α, β, γ
ΑΚΕΡΑΙΕΣ: επιλογη, επιλογη2
ΑΡΧΗ
ΓΡΑΨΕ 'Το παρακάτω πρόγραμμα σου δίνει τη δυνατότητα να υπολογίσεις την 3η πλευρά ενός ορθογωνίου τριγώνου ή να δεις αν ένα τρίγωνο είναι ορθογώνιο'
ΓΡΑΨΕ 'Αν θες να υπολογίσεις τη μία πλευρά γράψε τον αριθμό 1 και πάτα Enter. Αν θες να δεις αν ένα τρίγωνο είναι ορθογώνιο γράψε τον αριθμό 2 και πάτα Enter'
ΔΙΑΒΑΣΕ επιλογη
ΑΝ επιλογη=2 ΤΟΤΕ
ΓΡΑΨΕ 'Δώσε το μήκος της υποτείνουσας και πάτα το Enter'
ΔΙΑΒΑΣΕ α
ΓΡΑΨΕ 'Δώσε το μήκος της μίας κάθετης πλευράς και πάτα το Enter'
ΔΙΑΒΑΣΕ β
ΓΡΑΨΕ 'Δώσε το μήκος της άλλης κάθετης πλευράς και πάτα το Enter'
ΔΙΑΒΑΣΕ γ
ΑΝ α*α=β*β+γ*γ ΤΟΤΕ
ΓΡΑΨΕ 'Το τρίγωνο είναι ορθογώνιο'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Το τρίγωνο ΔΕΝ είναι ορθογώνιο'
ΤΕΛΟΣ_ΑΝ
ΑΛΛΙΩΣ_ΑΝ επιλογη=1 ΤΟΤΕ
ΓΡΑΨΕ 'Αν θες να υπολογίσεις την υποτείνουσα, γράψε τον αριθμό 1 και πάτα Enter. Αν θες να υπολογίσεις την μία κάθετη πλευρά, γράψε τον αριθμό 2 και πάτα Enter'
ΔΙΑΒΑΣΕ επιλογη2
ΑΝ επιλογη2=1 ΤΟΤΕ
ΓΡΑΨΕ 'Δώσε το μήκος της μίας κάθετης πλευράς και πάτα το Enter'
ΔΙΑΒΑΣΕ β
ΓΡΑΨΕ 'Δώσε το μήκος της άλλης κάθετης πλευράς και πάτα το Enter'
ΔΙΑΒΑΣΕ γ
ΓΡΑΨΕ 'Το μήκος της υποτείνουσας είναι α=', (Τ_Ρ(β*β+γ*γ))
ΑΛΛΙΩΣ_ΑΝ επιλογη2=2 ΤΟΤΕ
ΓΡΑΨΕ 'Δώσε το μήκος της υποτείνουσας και πάτα το Enter'
ΔΙΑΒΑΣΕ α
ΓΡΑΨΕ 'Δώσε το μήκος της κάθετης πλευράς που γνωρίζεις και πάτα το Enter'
ΔΙΑΒΑΣΕ β
ΓΡΑΨΕ 'Το μήκος της άλλης κάθετης πλευράς είναι γ=', (Τ_Ρ(α*α-β*β))
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Λάθος απάντηση'
ΤΕΛΟΣ_ΑΝ
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Λάθος απάντηση'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ