αλγοριθμος ασκηση
Για ι απο 1 μεχρι 100
Διαβασε ον[ι], ποσο[ι]
τελος_επαναληψης
Διαβασε ονομα
βρεθηκε <- ψευδης
ι <- 1
θεσ <-0
οσο βρεθηκε=ψευδης και ι<=100 επαναλαβε
αν ονομα= Ον[ι] τοτε
βρεθηκε<- αληθης
θεσ<- ι
αλλιως
ι<- ι+1
τελος_αν
Αν βρεθηκε=αληθης τοτε
Αρχη_επαναληψης
διαβασε ειδος
μεχρις_οτου ειδος="αναληψη" ή ειδος="καταθεση"
διαβασε ποσο
Αν ειδος="αναληψη" τοτε
Αν ποσο[θεσ]>= ποσο τοτε
Ποσο[θεσ] <- Ποσο[θεσ] - ποσο
αλλιως
εμφανισε"δεν μπορει να πραγματοποιηθει η συνναλαγη"
τελος_Αν
Αλλιως
Ποσο[θεσ] <- ποσο + Ποσο[θεσ]
τελος_αν
αλλιως
εμφανισε "δεν βρεθηκε ο υπαλληλος
Τελος_αν
μαξ <- ποσο[1]
για ι απο 2 μεχρι 100
αν ποσο[ι] > μαξ τοτε
μαξ <- ποσο[ι]
τελος_αν
τελος_επαναληψης
για ι απο 1 μεχρι 100
αν ποσο[ι]=μαξ τοτε
εμφανισε ον[ι]
τελος_αν
τελος_επαναληψης
τελος ασκηση
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Γιώργος
Τιμώμενο Μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Chris1993
Περιβόητο μέλος
γεια σας, μηπως μπορει καποιος να με βοηθησει με τις παρακατω ασκησεις;
Λύση της δεύτερης άσκησης! Βάζω το κυρίως μόνο γιατί βαριέμαι
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 120
ΔΙΑΒΑΣΕ ΟΝ[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 120
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 30
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ ΩΜ[i,j]
ΜΕΧΡΙΣ_ΟΤΟΥ ΩΜ[i,j] >= 0
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 30 ΜΕ_ΒΗΜΑ 2
ΣΩΜ <-- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 120
ΣΩΜ <-- ΣΩΜ + ΩΜ[i,j]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΕΚΤΥΠΩΣΕ ΣΩΜ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 120
Μ_0 <- 0
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 30
ΑΝ ΩΜ[i,j] = 0 ΤΟΤΕ
Μ_0 <-- Μ_0 + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΕΚΤΥΠΩΣΕ Μ_0
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 120
ΣΩΜ <-- 0
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 30
ΣΩΜ <-- ΣΩΜ + ΩΜ[i,j]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΜΟ_ΩΜ <-- ΣΩΜ/30
ΕΚΤΥΠΩΣΕ ΜΟ_ΩΜ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
Η ταξινόμηση είναι εύκολη Try it!
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Lost in the Fog
Νεοφερμένος
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Lost in the Fog
Νεοφερμένος
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Γιώργος
Τιμώμενο Μέλος
Λοιπόν. Σκέψου κατ' αρχάς στο δεκαδικό. Όταν "ολισθαίνεις" έναν αριθμό προς τα αριστερά, τι κάνεις; Προσθέτεις ένα μηδενικό, οπότε η αξία του αριθμού δεκαπλασιάζεται. Αντίθετα, όταν ολισθαίνεις έναν αριθμό προς τα δεξιά τι κάνεις; Κόβεις ένα ψηφίο, οπότε το αποτέλεσμα είναι ακέραια διαίρεση με το 10.παρεμπιπτόντως μηπως μπορειτε να μου εξηγησετε την ολισθηση γιατι δεν την εχω καταλαβει;
Πχ:
42 --> 4 (ολίσθηση προς τα δεξιά, /10 η αξία)
Ολίσθηση προς τα αριστερά: 0b1010100 --> 84
Ολίσθηση προς τα δεξιά: 0b10101 (το τελευταίο κόπηκε) --> 21
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
kiriazispao4ever
Δραστήριο μέλος
εκφώνηση
Να υλοποιηθεί συναρτηση η οποια να δεχεται εναν ακεραιο αριθμο και να επιστρεφει το πλήθος των ψηφίων.
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Lost in the Fog
Νεοφερμένος
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Γιώργος
Τιμώμενο Μέλος
Πρώτα πες μας εσύ τι έγραψες και πού κόλλησες. Χωρίς να γράψεις κώδικα, τι "λογική" θα ακολουθήσεις για να βρεις το πλήθος των ψηφίων ενός αριθμού;πρώτες ασκησεις σε υποπρογραμματα και βλέπω εχω ενα θεμα...Ρίξτε μια βοηθεια αν μπορειτε..
εκφώνηση
Να υλοποιηθεί συναρτηση η οποια να δεχεται εναν ακεραιο αριθμο και να επιστρεφει το πλήθος των ψηφίων.
Χώρια που η απάντηση είναι ΑΚΡΙΒΩΣ από πάνω σου. Διαβάζετε και λίγο το topic...
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
kiriazispao4ever
Δραστήριο μέλος
Πρώτα πες μας εσύ τι έγραψες και πού κόλλησες. Χωρίς να γράψεις κώδικα, τι "λογική" θα ακολουθήσεις για να βρεις το πλήθος των ψηφίων ενός αριθμού;
Χώρια που η απάντηση είναι ΑΚΡΙΒΩΣ από πάνω σου. Διαβάζετε και λίγο το topic...
την ελυσα την ασκηση τελικά.
Δεν ειναι που κολλούσα,ηταν (και είναι ) οτι δεν εχω καταλαβει ακόμη τα υποπρογραμματα.
Πως να τα περνάω στο κυρίως προγραμμα βασικά.
Με τις παραμέτρους τι γίνεται κτλπ...
Την λογική τους,οκ..την κατάλαβα..στην εφαρμογή εχω το θέμα..
1η απορια...
Μπορούμε να δηλωσουμε στο υποπρογραμμα ολοκληρο πινακα?
πχ-->
για ι απο 1 μεχρι 10
γραψε 'δωσε το ',ι,'ο στοιχειο πινακα'
διαβασε πιν[ι]
τελος_επαναληψης
μο<-κατι([U]πιν[ι][/U])<-----------------------
τελος_προργραμματος
Συναρτηση κατι [U](πιν[ι])[/U]<-------------
μπλα μπλα...
κατι<-τοσο
τελος_συναρτηση
η ασκηση ζηταει
να γινει υποπρογραμμα που θα ζηταει εναν πινακα πραγματικων και θα επιστρεφει τον μ_ο του πινακα αυτου..
ερωτηση 2.
πως μπορουμε να στρογγυλεψουμε εναν πραγματικο αριθμο?
πχ δινεται απο τον χρήστη ο αριθμος 232.8
και το προγραμμα να βγάζει στην εξοδο του 233...
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
antonisd95
Δραστήριο μέλος
Μπορούμε να δηλωσουμε στο υποπρογραμμα ολοκληρο πινακα?
Ένας πίνακας περνάει στο υποπρόγραμμα μόνο με το όνομά του.
Αν τον περάσεις προφανώς και πρέπει να τον δηλώσεις στο υποπρόγραμμα.
πως μπορουμε να στρογγυλεψουμε εναν πραγματικο αριθμο?
πχ δινεται απο τον χρήστη ο αριθμος 232.8
και το προγραμμα να βγάζει στην εξοδο του 233...
Αν θες το ακέραιο μέρος υπάρχει έτοιμη συνάρτηση.
Αν θες να τον στρογγυλοποιήσεις στον πιο κοντινό ακέραιο, τότε φτιάξε εσύ μία συνάρτηση που να το κάνει.
Δεν είναι δύσκολο.Έχω φτιάξει συνάρτηση και για στρογγυλοποίηση και για το ακέραιο μέρος.Κάποια άλλη στιγμή θα τα ανεβάσω.
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
kiriazispao4ever
Δραστήριο μέλος
Ένας πίνακας περνάει στο υποπρόγραμμα μόνο με το όνομά του.
Αν τον περάσεις προφανώς και πρέπει να τον δηλώσεις στο υποπρόγραμμα.
Αν θες το ακέραιο μέρος υπάρχει έτοιμη συνάρτηση.
Αν θες να τον στρογγυλοποιήσεις στον πιο κοντινό ακέραιο, τότε φτιάξε εσύ μία συνάρτηση που να το κάνει.
Δεν είναι δύσκολο.Έχω φτιάξει συνάρτηση και για στρογγυλοποίηση και για το ακέραιο μέρος.Κάποια άλλη στιγμή θα τα ανεβάσω.
δηλαδη αν εχουμε εναν πινακα 10 θεσεων με το ονομα "ΦΑΣΗ"
για να τον φωναξουμε (πχ απο διαδικασια..) αρκει να γραψουμε
καλεσε ΦΑΣΗ(.....)<---στις τελείες τι μπαινει ομως? ποιες θα ναι οι πραγματικες παράμετροι?
στον πιο κοντινό ακεραιο θέλω...
αλλα δεν μπορω να το υλοποίησω...
αν το βρείς και θες, ανεβασε το,γιατι δεν ξέρω αν θα προλάβω να το ξανακοιτάξω για να το βγάλω μόνος μου (πριν το μάθημα)..
σε ευχαριστώ φίλεε
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
antonisd95
Δραστήριο μέλος
Θ το ανεβάσω από εβδομάδα...
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
kiriazispao4ever
Δραστήριο μέλος
σε συγχωρωω... :pΤώρα βγαίνω, και δεν προλαβαίνω.
Θ το ανεβάσω από εβδομάδα...
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
maniavas
Εκκολαπτόμενο μέλος
πρώτες ασκησεις σε υποπρογραμματα και βλέπω εχω ενα θεμα...Ρίξτε μια βοηθεια αν μπορειτε..
εκφώνηση
Να υλοποιηθεί συναρτηση η οποια να δεχεται εναν ακεραιο αριθμο και να επιστρεφει το πλήθος των ψηφίων.
https://https://lyk-n-moudan.chal.sch.gr/Downloads/Yliko/Fylladio_Ypoprogrammata.pdf
δες λίγο αυτό το φυλλάδιο εμένα με βοήθησε ελπίζω να σου φανεί χρήσιμο
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
kiriazispao4ever
Δραστήριο μέλος
https://https://lyk-n-moudan.chal.sch.gr/Downloads/Yliko/Fylladio_Ypoprogrammata.pdf
δες λίγο αυτό το φυλλάδιο εμένα με βοήθησε ελπίζω να σου φανεί χρήσιμο
δεν μου το ανοίγει ...
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
maniavas
Εκκολαπτόμενο μέλος
δεν μου το ανοίγει ...
πως να το ανοιξει το καημενο αφου εχω βαλει δυο φορε http
https://lyk-n-moudan.chal.sch.gr/Downloads/Yliko/Fylladio_Ypoprogrammata.pdf
τώρα θα ανοίγει
ελπίζω
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
leobakagian
Εκκολαπτόμενο μέλος
δεν σου γραφω το πληρες προγραμμα γιατι δεν θυμαμαι το συντακτικο της ΓΛΩΣΣΑΣ...πρώτες ασκησεις σε υποπρογραμματα και βλέπω εχω ενα θεμα...Ρίξτε μια βοηθεια αν μπορειτε..
εκφώνηση
Να υλοποιηθεί συναρτηση η οποια να δεχεται εναν ακεραιο αριθμο και να επιστρεφει το πλήθος των ψηφίων.
η συναρτηση θα έχει ενα ακέραιο όρισμα αρ που ειναι ο δοθεν αριθμος και θα επιστρεφει εναν ακεραιο που είναι το πληθος των στοιχειων
δηλαδη:
ΑΚΕΡΑΙΟΣ ΠΟΣΑ_ΨΗΦΙΑ(ΑΚΕΡΑΙΟΣ ΑΡ) // ΑΥΤΟ ΜΕΤΑΤΡΕΨΕ ΤΟ ΜΕ ΒΑΣΗ ΤΟ ΣΥΝΤΑΚΤΙΚΟ ΤΗΣ ΓΛΩΣΣΑΣ
ΠΛΗΘΟΣ=1
ΟΣΟ (ΑΡ DIV 10!=0) ΕΠΑΝΑΛΑΒΕ
ΑΡ<-ΑΡ DIV 10
ΠΛΗΘΟΣ=ΠΛΗΘΟΣ+1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΕΠΕΣΤΡΕΨΕ ΠΛΗΘΟΣ //ΑΥΤΟ ΜΕΤΑΤΡΕΨΕ ΤΟ ΜΕ ΒΑΣΗ ΤΟ ΣΥΝΤΑΚΤΙΚΟ ΤΗΣ ΓΛΩΣΣΑΣ
με κάθε επιφύλαξη
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Γιώργος
Τιμώμενο Μέλος
δεν σου γραφω το πληρες προγραμμα γιατι δεν θυμαμαι το συντακτικο της ΓΛΩΣΣΑΣ...
η συναρτηση θα έχει ενα ακέραιο όρισμα αρ που ειναι ο δοθεν αριθμος και θα επιστρεφει εναν ακεραιο που είναι το πληθος των στοιχειων
δηλαδη:
ΑΚΕΡΑΙΟΣ ΠΟΣΑ_ΨΗΦΙΑ(ΑΚΕΡΑΙΟΣ ΑΡ) // ΑΥΤΟ ΜΕΤΑΤΡΕΨΕ ΤΟ ΜΕ ΒΑΣΗ ΤΟ ΣΥΝΤΑΚΤΙΚΟ ΤΗΣ ΓΛΩΣΣΑΣ
ΟΣΟ (ΑΡ DIV 10!=0) ΕΠΑΝΑΛΑΒΕ
ΑΡ<-ΑΡ DIV 10
ΠΛΗΘΟΣ=ΠΛΗΘΟΣ+1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΕΠΕΣΤΡΕΨΕ ΠΛΗΘΟΣ //ΑΥΤΟ ΜΕΤΑΤΡΕΨΕ ΤΟ ΜΕ ΒΑΣΗ ΤΟ ΣΥΝΤΑΚΤΙΚΟ ΤΗΣ ΓΛΩΣΣΑΣ
με κάθε επιφύλαξη
- Η κλήση ΠΟΣΑ_ΨΗΦΙΑ(4) τι θα επιστρέψει;
- Η μεταβλητή ΠΛΗΘΟΣ πρέπει να αρχικοποιηθεί.
Σημείωση: Το μήνυμα αυτό γράφτηκε 11 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Χρήστες Βρείτε παρόμοια
-
Τα παρακάτω 0 μέλη και 12 επισκέπτες διαβάζουν μαζί με εσάς αυτό το θέμα:Tα παρακάτω 61 μέλη διάβασαν αυτό το θέμα:
- john_55
- akis_95
- Marios2020
- Hased Babis
- Mara2004
- Mary06
- Valous
- Ilovemycats27
- katia.m
- Anna_kitty
- antonis97
- gewrgioyp
- Panagiotis849
- Σωτηρία
- marian
- ggl
- tsiobieman
- elenicar
- Scandal
- Δήμος56103
- eukleidhs1821
- calliope
- kwstaseL
- Eri0611
- liaiscool
- leo41
- Georgekk
- Athens2002
- Johnman97
- imkindalost
- panagiotis G
- Giovanni5
- marsenis
- thecrazycretan
- the purge
- eri548
- Ria99
- JohnGreek
- lostpfg
- Vold
- Λαμπρινηη
- SlimShady
- tasost
- Vasilina93
- kvstas92
-
Φορτώνει...
-
Το forum μας χρησιμοποιεί cookies για να βελτιστοποιήσει την εμπειρία σας.
Συνεχίζοντας την περιήγησή σας, συναινείτε στη χρήση cookies στον περιηγητή σας.