drosos
Πολύ δραστήριο μέλος
Ο Βασίλης αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής και μας γράφει απο Κερατσίνι (Αττική). Έχει γράψει 1,151 μηνύματα.
26-10-11
12:36
Αλγοριθμος θδ
βα<-0
ββ<-0
!βαθμολογιες παικτων
διαβασε ον1,ον2!ονοματα πακτων
αρχη_επαναληψης
διαβασε ζ1,ν1,ζ2,ν2!ζαρι και νομισμα
Aν ζ1<>ζ2 και ν1<>ν2 τοτε!Ο τελευταιος γυρος να μην λαμβανεται υποψιν στην βαθμολογια
Για i απο 1 μεχρι 6
αν ζ1=i και ν1='γ' τοτε
βα<-βα+i
αλλιως_αν ζ2=i και ν2='γ' τοτε
ββ<-ββ+i
τελος_αν
αν ζ1=i και ν1='κ' τοτε
βα<-βα+2*i
αλλιως_αν ζ2=i και ν2='κ' τοτε
ββ<-ββ+2*i
τελος_αν
τελος_επαναληψης
αν ζ1>ζ2 τοτε
βα<-βα+5
αλλιως αν ζ1<ζ2 τοτε
ββ<-ββ+5
αλλιως
βα<-βα
ββ<-ββ
τελος_αν
Αν ζ1=1 και ν1='γ' τοτε
ββ<-ββ+8
αλλιως_αν ζ2=1 και ν2='γ' τοτε
βα<-βα+8
αλλιως
βα<-βα
ββ<-ββ
τελος_αν
για j απο 1 μεχρι 2
οσο ζ1=6 και ν1='κ' και j<=2 επαναλαβε
αν j=2 τοτε
βα<-βα+20
τελος_αν
τελος_επαναληψης
τελος_επαναληψης
για ρ απο 1 μεχρι 2
οσο ζ2=6 και ν2='κ' και ρ<=2 επαναλαβε
αν ρ=2 τοτε
ββ<-ββ+20
τελος_αν
τελος_επαναληψης
τελος_επαναληψης
τελος_αν!το πρωτο
μεχρις_οτου (βα<>ββ) και (ν1=ν2) και (ζ1=ζ2)
Αν βα>ββ τοτε
δ<-βα-ββ
εμφανισε ον1,βα,δ
αλλιως αν βα<ββ τοτε
δ<-ββ-βα
εμφανισε ον2,ββ,δ
αλλιως
εμφανισε "ισοπαλια"
τελος_αν
τελος θδ
Και ολοκληρωμενο το δ
βα<-0
ββ<-0
!βαθμολογιες παικτων
διαβασε ον1,ον2!ονοματα πακτων
αρχη_επαναληψης
διαβασε ζ1,ν1,ζ2,ν2!ζαρι και νομισμα
Aν ζ1<>ζ2 και ν1<>ν2 τοτε!Ο τελευταιος γυρος να μην λαμβανεται υποψιν στην βαθμολογια
Για i απο 1 μεχρι 6
αν ζ1=i και ν1='γ' τοτε
βα<-βα+i
αλλιως_αν ζ2=i και ν2='γ' τοτε
ββ<-ββ+i
τελος_αν
αν ζ1=i και ν1='κ' τοτε
βα<-βα+2*i
αλλιως_αν ζ2=i και ν2='κ' τοτε
ββ<-ββ+2*i
τελος_αν
τελος_επαναληψης
αν ζ1>ζ2 τοτε
βα<-βα+5
αλλιως αν ζ1<ζ2 τοτε
ββ<-ββ+5
αλλιως
βα<-βα
ββ<-ββ
τελος_αν
Αν ζ1=1 και ν1='γ' τοτε
ββ<-ββ+8
αλλιως_αν ζ2=1 και ν2='γ' τοτε
βα<-βα+8
αλλιως
βα<-βα
ββ<-ββ
τελος_αν
για j απο 1 μεχρι 2
οσο ζ1=6 και ν1='κ' και j<=2 επαναλαβε
αν j=2 τοτε
βα<-βα+20
τελος_αν
τελος_επαναληψης
τελος_επαναληψης
για ρ απο 1 μεχρι 2
οσο ζ2=6 και ν2='κ' και ρ<=2 επαναλαβε
αν ρ=2 τοτε
ββ<-ββ+20
τελος_αν
τελος_επαναληψης
τελος_επαναληψης
τελος_αν!το πρωτο
μεχρις_οτου (βα<>ββ) και (ν1=ν2) και (ζ1=ζ2)
Αν βα>ββ τοτε
δ<-βα-ββ
εμφανισε ον1,βα,δ
αλλιως αν βα<ββ τοτε
δ<-ββ-βα
εμφανισε ον2,ββ,δ
αλλιως
εμφανισε "ισοπαλια"
τελος_αν
τελος θδ
Και ολοκληρωμενο το δ
Σημείωση: Το μήνυμα αυτό γράφτηκε 12 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
drosos
Πολύ δραστήριο μέλος
Ο Βασίλης αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής και μας γράφει απο Κερατσίνι (Αττική). Έχει γράψει 1,151 μηνύματα.
24-10-11
00:05
Θέμα 1ο
2)Aκεραιες: Δεχεται ακεραιους αριθμους(π.χ 1,-1,2)
Πραγματικες:Δεχεται και ακεραιες και πραγματικους αριθμους(π.χ 1,5)
Χαρακτηρες:Δεχεται αριθμους μαζι με γραμματα
Λογικες:Αληθης ή ψευδης
3)i)Λ,ii)Σ,iii)Λ,iv)Λ
4)i)β,ii)γ
Θεμα 2ο
1)Αλγόριθμος ΘΕΜΑ_Β1
Ν<-1
Διαβασε M
χ<-3
i<-1
Oσο i<=Μ επαναλαβε
Αρχη_επαναληψης
χ<- -χ+1
Μεχρις_οτου χ>0
Ν<-Ν*χ+1
i<-i+2
Τελος_επαναληψης
Εκτυπωσε Ν
τελος ΘΕΜΑ_Β1
iii)Ν=4
2)Ψ,Α,Ψ
Α,Α,Α
Ψ,Α,Ψ
Ψ,Α,Α
3)Απειρες αφου το i δεν θα γινει ποτε 0 αρα η οσο θα ειναι παντα αληθης.
Θεμα 3
Αλγοριθμος θεμα3
σβ<-0
σν<-0
διαβασε ν!Νουμερο φανελας
οσο ν>=0 επαναλαβε
σν<-σν+1!Ποσες φορες διαβασε θετικο ν
διαβασε ν
τελος_επαναληψς
!Στο σν εχω ποσες φορες εχει διαβαστει θετικος αριθμος
Για i απο 1 μεχρι σν!Για οσες φορες εχει διαβαστει θετικος αριθμος
Αρχη_επαναληψης
διαβασε υ!υψος
μεχρις_οτου υ>160 και υ<230
Αρχη_επαναληψης
διαβασε β!βαρος
μεχρις_οτου β>50 και β<170
σβ<-σβ+β
Αν i=1 τοτε
max<-υ
αλλιως
αν υ>max τοτε
max<-υ
τελος _αν
τελος_αν
Aν i=1 τοτε
min<-υ
αλλιως
αν υ<min τοτε
min<-υ
τελος_αν
τελος_αν
τελος επαναληψης
Δ<-A_T(max-min)
εμφανισε Δ
μο<-σβ/σν!ο μεσος ορος του βαρους των παιχτων
εμφανισε μο
τελος θεμα3
Δεν νομιζω να ειναι σωστο το προγραμμα αλλα ειπα να το γραψω
Το θεμα 4ο θα το δοκιμασω αυριο αν κ μ φαινεται πολυ δυσκολο(δεν νομιζω να χρειαζεται επιλεξε γτ δεν την εχουμε διδαχτει φετος)
2)Aκεραιες: Δεχεται ακεραιους αριθμους(π.χ 1,-1,2)
Πραγματικες:Δεχεται και ακεραιες και πραγματικους αριθμους(π.χ 1,5)
Χαρακτηρες:Δεχεται αριθμους μαζι με γραμματα
Λογικες:Αληθης ή ψευδης
3)i)Λ,ii)Σ,iii)Λ,iv)Λ
4)i)β,ii)γ
Θεμα 2ο
1)Αλγόριθμος ΘΕΜΑ_Β1
Ν<-1
Διαβασε M
χ<-3
i<-1
Oσο i<=Μ επαναλαβε
Αρχη_επαναληψης
χ<- -χ+1
Μεχρις_οτου χ>0
Ν<-Ν*χ+1
i<-i+2
Τελος_επαναληψης
Εκτυπωσε Ν
τελος ΘΕΜΑ_Β1
iii)Ν=4
2)Ψ,Α,Ψ
Α,Α,Α
Ψ,Α,Ψ
Ψ,Α,Α
3)Απειρες αφου το i δεν θα γινει ποτε 0 αρα η οσο θα ειναι παντα αληθης.
Θεμα 3
Αλγοριθμος θεμα3
σβ<-0
σν<-0
διαβασε ν!Νουμερο φανελας
οσο ν>=0 επαναλαβε
σν<-σν+1!Ποσες φορες διαβασε θετικο ν
διαβασε ν
τελος_επαναληψς
!Στο σν εχω ποσες φορες εχει διαβαστει θετικος αριθμος
Για i απο 1 μεχρι σν!Για οσες φορες εχει διαβαστει θετικος αριθμος
Αρχη_επαναληψης
διαβασε υ!υψος
μεχρις_οτου υ>160 και υ<230
Αρχη_επαναληψης
διαβασε β!βαρος
μεχρις_οτου β>50 και β<170
σβ<-σβ+β
Αν i=1 τοτε
max<-υ
αλλιως
αν υ>max τοτε
max<-υ
τελος _αν
τελος_αν
Aν i=1 τοτε
min<-υ
αλλιως
αν υ<min τοτε
min<-υ
τελος_αν
τελος_αν
τελος επαναληψης
Δ<-A_T(max-min)
εμφανισε Δ
μο<-σβ/σν!ο μεσος ορος του βαρους των παιχτων
εμφανισε μο
τελος θεμα3
Δεν νομιζω να ειναι σωστο το προγραμμα αλλα ειπα να το γραψω
Το θεμα 4ο θα το δοκιμασω αυριο αν κ μ φαινεται πολυ δυσκολο(δεν νομιζω να χρειαζεται επιλεξε γτ δεν την εχουμε διδαχτει φετος)
Σημείωση: Το μήνυμα αυτό γράφτηκε 12 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.