*        4. ΓΙΑ …. ΑΠΟ … ΜΕΧΡΙ

 

Άσκηση 1η Άσκηση 2η Άσκηση 3η Άσκηση 4η Άσκηση 5η Άσκηση 6η Άσκηση 7ηΆσκηση 8η Άσκηση 9η  Άσκηση 10η  Άσκηση 11η  Άσκηση 12η Άσκηση 13η

Άσκηση 14η  Άσκηση 15η  Άσκηση 16η Άσκηση 17η Άσκηση 18η  Άσκηση 19η  Άσκηση 20η  Άσκηση 21η Άσκηση 22η Άσκηση 23η Άσκηση 24η  Άσκηση 25η


 

*        4. ΓΙΑ …. ΑΠΟ … ΜΕΧΡΙ

1. Να εμφανιστεί ο Αριθμός για Αριθμός = από 1 μέχρι 10.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR1

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 10

    ΓΡΑΨΕ AR1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

2. Να υπολογιστεί το 3*Α για Α=1 μέχρι 10.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR1A

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 10

    ΓΡΑΨΕ AR1,'  ',3*AR1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

3. Να εμφανιστεί το Α για Α=-10 μέχρι 10.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR1B

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ -10 ΜΕΧΡΙ 10

    ΓΡΑΨΕ AR1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

4. Να υπολογιστεί το 3*Α+5 για Α=-10 μέχρι 10.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR1C

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ -10 ΜΕΧΡΙ 10

    ΓΡΑΨΕ AR1,'   ',3*AR1+5

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

5. Να υπολογιστεί το Α*Α για Α=1 μέχρι 5.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR1D

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 5

    ΓΡΑΨΕ AR1*AR1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ


 

6. Να υπολογιστεί το 2*Α-1 για Α=15 μέχρι 1 με βήμα -1.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR1E

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 15 ΜΕΧΡΙ 1 ΜΕ ΒΗΜΑ -1

    ΓΡΑΨΕ AR1*2-1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

7. Να εμφανιστεί το Α για Α=15 μέχρι 1 με βήμα -1.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR2

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 15 ΜΕΧΡΙ 1 ΜΕ ΒΗΜΑ -1

    ΓΡΑΨΕ AR1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

8. Να υπολογιστεί το 2*Α-1 για Α=15 μέχρι 1 με βήμα -1.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR2A

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 15 ΜΕΧΡΙ 1 ΜΕ ΒΗΜΑ -1

    ΓΡΑΨΕ AR1*2-1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

9. Για Α=1 μέχρι 3 και Β=1 μέχρι 3 να εμφανιστούν οι συνδυασμοί των Α και Β

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR3

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1 , AR2

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 3

 

    ΓΙΑ AR2 ΑΠΟ 1 ΜΕΧΡΙ 3

      ΓΡΑΨΕ AR1,' ',AR2

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

10. Για Α=1 μέχρι 3 και Β=1 μέχρι 3 να εμφανιστεί μετά από κάθε Α όλες οι τιμές του Β.

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR3A

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1 , AR2

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 3

    ΓΡΑΨΕ AR1

 

    ΓΙΑ AR2 ΑΠΟ 1 ΜΕΧΡΙ 3

      ΓΡΑΨΕ AR2

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ


 

11. Για Α=1 μέχρι 3 και Β=1 μέχρι 3 να εμφανιστούν οι τιμές του Α και μετά οι τιμές του Β

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR3A_2

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1 , AR2

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 3

    ΓΡΑΨΕ AR1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΓΙΑ AR2 ΑΠΟ 1 ΜΕΧΡΙ 3

    ΓΡΑΨΕ AR2

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

12. Άθροισμα 1+2+  … +ν

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR4

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1 , ν

  ΠΡΑΓΜΑΤΙΚΕΣ: SYN

 

ΑΡΧΗ

  SYN <-- 0

  ΓΡΑΨΕ 'πόσοι αριθμοί= '

  ΔΙΑΒΑΣΕ ν

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ ν

    SYN <-- SYN+1

    ΓΡΑΨΕ 'ΑΘΡΟΙΣΜΑ= ', SYN

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ     

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

13. Για Α=1 μέχρι 5 και Β=1 μέχρι 5 να εμφανιστούν οι τιμές του Α^2 και μετά οι τιμές του Β^3 με 0 ψηφία μετά το κόμμα

 

αρχή

ΠΡΟΓΡΑΜΜΑ FOR5A

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1 , AR2

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 5

    ΓΡΑΨΕ AR1^2:2:0

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΓΙΑ AR2  ΑΠΟ 1 ΜΕΧΡΙ 5

 

    ΓΡΑΨΕ AR2^3:2:0

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

14. Για Α=1 μέχρι 3 και Β=3 μέχρι 1 με βήμα -1 να εμφανιστούν μετά από κάθε Α όλες οι τιμές του Β

αρχή

ΠΡΟΓΡΑΜΜΑ FOR5A

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:AR1 , AR2

 

ΑΡΧΗ

 

  ΓΙΑ AR1 ΑΠΟ 1 ΜΕΧΡΙ 3

    ΓΡΑΨΕ AR1

    ΓΙΑ AR2  ΑΠΟ 3 ΜΕΧΡΙ 1 ΜΕ ΒΗΜΑ -1

      ΓΡΑΨΕ AR2

 

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ


 

15. επανάληψη ν φορές του '**--++//**'

 

 

αρχή

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:metritis,fores

ΑΡΧΗ

  ΓΡΑΨΕ 'programma= επανάληψη   '

 

  ΓΡΑΨΕ

  ΓΡΑΨΕ 'poses fores ;;;'

 

  ΔΙΑΒΑΣΕ fores

 

  ΓΙΑ metritis ΑΠΟ 1 ΜΕΧΡΙ fores

 

    ΓΡΑΨΕ '**--++//**'

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

16. μετατροπή βαθμών Κελσίου (-40 μέχρι 120) σε Φαρενάιτ.

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

  ΠΡΑΓΜΑΤΙΚΕΣ: c,f,m

ΑΡΧΗ

  ΓΡΑΨΕ 'programma= μετατροπή βαθμών Κελσίου σε Φαρενάιτ    '

 

  ΓΡΑΨΕ

 

  ΓΙΑ f ΑΠΟ -40 ΜΕΧΡΙ 120

 

    c <-- 5-(f-32)/9

 

    ΓΡΑΨΕ'F= ',f:4:2,'==> ','C=',c:8:2

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

17. εκτύπωσης προπαίδειας (3*3).

Εντολή ΓΙΑ ... ΜΕΧΡΙ  ???????

 

αρχή

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: grammi,stili

ΑΡΧΗ

  ΓΡΑΨΕ 'programma= εκτύπωσης προπαίδειας     '

 

  ΓΡΑΨΕ

 

  ΓΙΑ grammi ΑΠΟ 1 ΜΕΧΡΙ 3

 

    ΓΙΑ stili ΑΠΟ 1 ΜΕΧΡΙ 3

 

      ΓΡΑΨΕ grammi*stili:4

 

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ


 

18. υπολογισμός του 1+3+5+7 +19 (περιττοί αριθμοί)

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: synolo,bima

ΑΡΧΗ

  ΓΡΑΨΕ 'programma= υπολογισμός του 1+3+5 … + 19 (περιττοί αριθμοί)     '

 

  synolo:=0

  bima:=1

 

  ΓΡΑΨΕ

 

  ΓΙΑ bima ΑΠΟ 1 ΜΕΧΡΙ 20 ΜΕ ΒΗΜΑ 2

 

    synolo:=synolo+bima

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΓΡΑΨΕ synolo

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

19. υπολογισμός αθροίσματος και μέσου όρους ν αριθμών

Εντολή ΓΙΑ ... ΜΕΧΡΙ

 

αρχή

 

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

  ΠΡΑΓΜΑΤΙΚΕΣ:    athroisma,timi,mesos

  ΑΚΕΡΑΙΕΣ:posoi,metritis

 

ΑΡΧΗ

  ΓΡΑΨΕ 'programma= υπολογισμός αθροίσματος και μέσου όρους ν αριθμών )     '

  ΓΡΑΨΕ

  ΓΡΑΨΕ 'posoi arithmoi ;; '

  ΔΙΑΒΑΣΕ   posoi

 

  athroisma:=0

 

  ΓΡΑΨΕ

 

  ΓΙΑ metritis ΑΠΟ 1 ΜΕΧΡΙ posoi

 

    ΔΙΑΒΑΣΕ timi

 

    athroisma:=athroisma+timi

    mesos:=athroisma/posoi

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΓΡΑΨΕ 'το άθροισμα είναι : ',athroisma:2:2

  ΓΡΑΨΕ

  ΓΡΑΨΕ 'ο μέσος όρος είναι : ',mesos:2:2

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ


 

20. Εντολή ΓΙΑ … ΑΠΟ …. ΜΕΧΡΙ

 

 

αρχή

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

 

  ΑΚΕΡΑΙΕΣ:k,l,m,n

 

ΑΡΧΗ

  ΓΡΑΨΕ ‘εντολή ΓΙΑ … ΑΠΌ …. ΜΕΧΡΙ’      '

  ΓΡΑΨΕ

  ΓΡΑΨΕ 'posoi arithmoi ;; '

  ΔΙΑΒΑΣΕ   m

 

  ΓΡΑΨΕ

 

  ΓΙΑ k ΑΠΟ 1 ΜΕΧΡΙ m

 

    ΓΡΑΨΕ 'dose arithmo  ..'

    ΔΙΑΒΑΣΕ n

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΓΡΑΨΕ k:5, n:5

  ΓΡΑΨΕ

  ΓΡΑΨΕ n:5

  ΓΡΑΨΕ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

21. εκτύπωση ν (*)  

 

 

αρχή  

ΠΡΟΓΡΑΜΜΑ for_gia

 

ΜΕΤΑΒΛΗΤΕΣ

 

  ΑΚΕΡΑΙΕΣ:i,j,l,n

 

ΑΡΧΗ

ΓΡΑΨΕ 'programma= εκτύπωση ν αριθμών σε (*)’

  ΓΡΑΨΕ

  ΓΡΑΨΕ 'posoi arithmoi ;; '

  ΔΙΑΒΑΣΕ   n

  ΓΡΑΨΕ

 

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ n

 

      ΓΡΑΨΕ '*’

 

   ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 2*i-1

 

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

22. Άθροισμα του Μ=1 ΜΕΧΡΙ 10

 

αρχή

ΠΡΟΓΡΑΜΜΑ   aaa

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:   Σ,Μ

ΑΡΧΗ

 

  Σ:=0

 

  Για Μ από 1 μέχρι 10

    Σ:=Σ+Μ

  Τέλος_επανάληψης

  ΓΡΑΨΕ  Σ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ


 

23. άθροισμα του Μ=1 ΜΕΧΡΙ 10

 

 

αρχή

ΠΡΟΓΡΑΜΜΑ   aaa

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ:   K,Σ,Μ

ΑΡΧΗ

 

  Σ:=0

  Μ:=1

 

  Για Κ από 1 μέχρι 10

 

    Σ:= Σ+Μ

 

    Μ:=Μ+1

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

  ΓΡΑΨΕ  Σ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

24. Βαθμοί_Φαρεναιτ

 

αρχή

ΠΡΟΓΡΑΜΜΑ  Βαθμοί_Φαρεναιτ

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: Celsius

  ΠΡΑΓΜΑΤΙΚΕΣ: Fahrenheit

 

ΑΡΧΗ

 

  ΓΙΑ Celsius ΑΠΟ 10 ΜΕΧΡΙ 20 ΜΕ ΒΗΜΑ 5

 

    Fahrenheit := 9 / 5 * Celsius + 32

 

    ΓΡΑΨΕ 'Η θερμοκρασία   ',Celsius,'  βαθμών Κελσίου :'

    ΓΡΑΨΕ ' σε βαθμούς Φαρεναιτ είναι :', Fahrenheit:6:2 ,' F'

 

    ΓΡΑΨΕ

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

25. Βαθμοί_Φαρεναιτ

 

αρχή

ΠΡΟΓΡΑΜΜΑ  Βαθμοί_Φαρεναιτ

 

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: Celsius

  ΠΡΑΓΜΑΤΙΚΕΣ: Fahrenheit

 

ΑΡΧΗ

 

  ΓΙΑ Celsius ΑΠΟ 10 ΜΕΧΡΙ 20

 

    Fahrenheit := 9 / 5 * Celsius + 32

 

    ΓΡΑΨΕ 'Η θερμοκρασία   ',Celsius,'  βαθμών Κελσίου :'

    ΓΡΑΨΕ ' σε βαθμούς Φαρεναιτ είναι :', Fahrenheit:6:2 ,' F'

 

    ΓΡΑΨΕ

 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ