Τώρα είναι Πέμ 20 Φεβ 2020 06:34 pm

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




Δημιουργία νέου θέματος Απαντήστε στο θέμα  [ 1 Δημοσίευση ] 
Συγγραφέας Μήνυμα
 Θέμα δημοσίευσης: Ακολουθία 1 , 2 , 4 , 8 , ...
ΔημοσίευσηΔημοσιεύτηκε: Τρί 26 Δεκ 2006 11:48 am 
Χωρίς σύνδεση

Εγγραφή: Κυρ 12 Οκτ 2003 01:52 am
Δημοσιεύσεις: 189
Τοποθεσία: ΝΙΚΑΙΑ - ΠΕΙΡΑΙΑΣ
Syntax: [ Download ] [ Hide ]
! Να γραφεί πρόγραμμα που θα εμφανίζει στην οθόνη την ακολουθία
!     1 , 2 , 4 , 8 , 16 , 32 , ... μέχρι κάποιο όριο που εμείς θα δώσουμε.
! Να εμφανίζει επίσης το άθροισμα των όρων της ακολουθίας και
! το άθροισμα των τετραγώνων τους.


ΠΡΟΓΡΑΜΜΑ ΕΠ_1_14
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: όριο , Ν ,s1 , s2
ΑΡΧΗ
  ΓΡΑΨΕ 'Μέχρι ποιο αριθμό να φθάσω'
  ΔΙΑΒΑΣΕ όριο
  Ν <-- 1
  ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
    ΓΡΑΨΕ Ν
    s1 <-- s1 + Ν
    s2 <-- s2 + Ν*Ν
    Ν <-- 2*Ν
  ΜΕΧΡΙΣ_ΟΤΟΥ Ν > όριο
  ΓΡΑΨΕ '’θροισμα =',s1
  ΓΡΑΨΕ '’θροισμα τετραγώνων =',s2
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
 


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

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


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

Μέλη σε αυτή την Δ. Συζήτηση : Bing [Bot] και 1 επισκέπτης


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

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