Ασκησιολόγιο ΓλωσσοΜάθειας
https://www.spinet.gr/glossomatheia/programs/

Προσομοίωση - Θέμα 2
https://www.spinet.gr/glossomatheia/programs/viewtopic.php?f=30&t=558
Σελίδα 1 από 1

Συγγραφέας:  ΧΑΤΖΗΤΣΟΜΠΑΝΗΣ ΘΕΟΦΙΛΟΣ [ Τετ 23 Μάιος 2007 11:32 am ]
Θέμα δημοσίευσης:  Προσομοίωση - Θέμα 2

Syntax: [ Download ] [ Hide ]
! ===============================================================================================
! ΠΡΟΣΟΜΟΙΩΣΗ 2007 - ΘΕΜΑ 2
!================================================================================================
! Δίνεται το ακόλουθο πρόγραμμα :
!
! ΠΡΟΓΡΑΜΜΑ ΘΕΜΑ2
! ΜΕΤΑΒΛΗΤΕΣ
!   ΑΚΕΡΑΙΕΣ : i , j , Α , Β , D
! ΑΡΧΗ
!   Α <-- 4
!   Β <-- 10
!   ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 2
!     ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ i
!       ΚΑΛΕΣΕ ΔΙΑΔ(Α , Β)
!       Α <-- Α + 3
!       Β <-- Β - 4
!     ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
!   ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
!   D <-- Α DIV Β
!   ΓΡΑΨΕ d
! ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
!
! ΔΙΑΔΙΚΑΣΙΑ ΔΙΑΔ(Β , Γ)
! ΜΕΤΑΒΛΗΤΕΣ
!   ΑΚΕΡΑΙΕΣ : Α , Β , Γ
! ΑΡΧΗ
!   B <-- B + 1
!   A <-- A + 2
!   Γ <-- FUN(Γ , Α)
!   ΓΡΑΨΕ Α , Β , Γ
! ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
!
! ΣΥΝΑΡΤΗΣΗ FUN( Χ , Υ) : ΑΚΕΡΑΙΑ
! ΜΕΤΑΒΛΗΤΕΣ                                                      
!   ΑΚΕΡΑΙΕΣ : Χ , Υ
! ΑΡΧΗ
!   FUN <-- Υ mod Χ
! ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
!
! Να εκτελέσετε το παραπάνω πρόγραμμα και να γράψετε :
! Α. Τις τιμές των μεταβλητών Α , Β , Γ όπως αυτές εκτυπώνονται από τη διαδικασία σε κάθε επανάληψη.
! Β. Την τιμή της μεταβλητής D που εκτυπώνεται.
!
!================================================================================================

ΠΡΟΓΡΑΜΜΑ PR_07_2
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ : i , j , Α , Β , D
ΑΡΧΗ                          
  Α <-- 4
  Β <-- 10
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 2
    ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ i
      ΚΑΛΕΣΕ DIAD(Α , Β)
      Α <-- Α + 3
      Β <-- Β - 4
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  D <-- Α DIV Β
  ΓΡΑΨΕ D
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

! ---------------------------

ΔΙΑΔΙΚΑΣΙΑ DIAD(Β , Α)
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ : Α , Β , Γ
ΑΡΧΗ
  Β <-- Β + 1
  Α <-- Α + 2
  Γ <-- FUN(Α , Β)
  ΓΡΑΨΕ Α , Β , Γ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ

! ---------------------------

ΣΥΝΑΡΤΗΣΗ FUN(x,y): ΑΚΕΡΑΙΑ
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ : x , y
ΑΡΧΗ
  FUN <-- y MOD x
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ

 

Σελίδα 1 από 1 Όλοι οι χρόνοι είναι UTC + 2 ώρες [ DST ]
Powered by phpBB® Forum Software © phpBB Group
http://www.phpbb.com/