Τώρα είναι Πέμ 28 Μαρ 2024 11:25 pm

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




Δημιουργία νέου θέματος Απαντήστε στο θέμα  [ 1 Δημοσίευση ] 
Συγγραφέας Μήνυμα
 Θέμα δημοσίευσης: Προσομοίωση - Θέμα 3
ΔημοσίευσηΔημοσιεύτηκε: Δευτ 09 Απρ 2007 10:04 pm 
Χωρίς σύνδεση

Εγγραφή: Κυρ 12 Οκτ 2003 01:52 am
Δημοσιεύσεις: 189
Τοποθεσία: ΝΙΚΑΙΑ - ΠΕΙΡΑΙΑΣ
Syntax: [ Download ] [ Hide ]
! ===============================================================================================
! ΠΡΟΣΟΜΟΙΩΣΗ 2001 - ΘΕΜΑ 3
! ===============================================================================================
! Ρομπότ με σταθερό μήκος βήματος καταφτάνει στον πλανήτη Άρη για να περισυλλέξει πετρώματα.
! Κάθε 1 βήμα του είναι 80cm. Το ρομπότ διαθέτει μετρητή βημάτων.
! Διένυσε στον Άρη μία ευθεία από σημείο Α σε σημείο Β και ο μετρητής βημάτων κατέγραψε Ν βήματα.
! Να γραφεί αλγόριθμος που:
!   Α) να διαβάζει τον αριθμό Ν των βημάτων του ρομπότ.
!   Β) να υπολογίζει και να τυπώνει την απόσταση ΑΒ που διανύθηκε σε cm.
!   Γ) να μετατρέπει και να τυπώνει αυτήν την απόσταση σε km, m και cm.
!      Πχ. αν η απόσταση είναι 100.060 cm, τότε να τυπώνει : 1 km , 0 m , 60 cm.
! ===============================================================================================

ΠΡΟΓΡΑΜΜΑ PR_2001_3
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: d ,n ,x ,y,z,temp
ΑΡΧΗ
  ΓΡΑΨΕ 'Πόσα βήματα έκανε το ρομπότ ;'
  ΔΙΑΒΑΣΕ n
  d <-- n * 80
  ΓΡΑΨΕ 'AB = ',d,' cm.'
  x <-- d DIV 100000
  temp <-- d MOD 100000
  y <-- temp DIV 100
  z <-- temp MOD 100
  ΓΡΑΨΕ 'Η απόσταση αυτή είναι :  ',x,' χιλιόμετρα  ',y,' μέτρα και ',z,' cm'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
 


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

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


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

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


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

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