ΘΕΜΑ
Α
Α1 1. Λ 2. Λ
3. Σ 4. Λ 5. Σ
Α2
Εντολή εκχώρησης
|
Τύπος μεταβλητής Χ
|
Περιεχόμενο μεταβλητής Χ
|
Χ <-- ´ΑΛΗΘΗΣ´
|
ΧΑΡΑΚΤΗΡΑΣ
|
‘ΑΛΗΘΗΣ’
|
Χ <-- 11.0 – 13.0
|
ΠΡΑΓΜΑΤΙΚΗ
|
-2.0
|
Χ <-- 7 > 4
|
ΛΟΓΙΚΗ
|
ΑΛΗΘΗΣ
|
Χ <-- ΨΕΥΔΗΣ
|
ΛΟΓΙΚΗ
|
ΨΕΥΔΗΣ
|
X <-- 4
|
ΑΚΕΡΑΙΑ
|
4
|
Α3.
α β
Α[3] <-- 3 + Α[6]
Α[9] <-- Α[7] – 2
Α[8] <-- Α[3] – 5
Α[4] <-- 5 + Α[9]
Α[5] <-- (Α[3] + Α[7]) div 2
|
Για
i από 1 μέχρι 5
αντιμετάθεσε Α[ i
], Α[
11 - i]
Τέλος_επανάληψης
|
Α4. α β
Ι <-- 99
Όσο Ι > =
1 επανάλαβε
Χ <-- Ι^2
Εμφάνισε
χ
Ι <-- Ι - 2
Τέλος_επανάληψης
|
Ι <-- 99
Αρχή_επανάληψης
Χ <-- Ι^2
Εμφάνισε
χ
Ι <-- Ι - 2
Μέχρις_ότου Ι < 1
|
Α5.
Σελίδα 60
ΘΕΜΑ
Β
Β1
Κ
|
Χ
|
Ι
|
ΟΘΟΝΗ
|
1
|
-1
|
0
|
|
-1
|
1
|
1
|
-1, -1
|
-1
|
2
|
2
|
-1, 1
|
-2
|
4
|
3
|
-2, 2
|
-8
|
5
|
4
|
-8, 4
|
-40
|
7
|
5
|
-40, 5
|
Β2
Ν <--0, s <-- 0
Αρχή_επανάληψης
Αν ν mod 2 = 1 τότε
Χ <-- -1
Αλλιώς
Χ <-- 1
Τέλος_αν
s <-- s + x / (2*ν+1)
ν <-- ν + 1
μέχρις_ότου ν = 99
π <-- 4*s
εκτύπωσε π
ΘΕΜΑ
Γ
Αλγόριθμος
Θέμα_Γ
Αρχή_επανάληψης
Διάβασε ποσό
Μέχρις_ότου
ποσό > 5000000
mikro <-- 0, sum_mikro <-- 0
megalo <-- 0, sum_megalo <-- 0
Διάβασε
έργο, προϋπ
Όσο
έργο <> ’ΤΕΛΟΣ’ ΚΑΙ ποσό > = 200000*60/100 επανάλαβε
Αν προϋπ >= 200000 ΚΑΙ προϋπ <= 299999 τότε
επιδότηση <--
προϋπ *60/10
Αλλιώς
επιδότηση <--
προϋπ *70/10
Τέλος_αν
Αν επιδότηση <= ποσό τότε
ποσό <--
ποσό – επιδότηση
Εμφάνισε έργο, επιδότηση
Αν προϋπ >= 200000
ΚΑΙ προϋπ <= 299999 τότε
mikro <-- mikro +1
Sum_mikro <-- sum_mikro + επιδότηση
Αλλιώς
Megalo <-- megalo + 1
Sum_megalo <-- suma_megalo + επιδότηση
Τέλος_αν
τέλος_αν
Διάβασε έργο, προϋπ
Τέλος_επανάληψης
Εμφάνισε
‘Μικρά Έργα :’, mikro, sum_mikro
Εμφάνισε
‘Μεγάλα Έργα :’, megalo, sum_megalo
Αν
ποσό > 0 τότε
Εμφάνισε ‘Ποσό που έχει διατεθεί :’,
ποσό
Τέλος_αν
Τέλος_θέμα_Γ
ΘΕΜΑ
Δ
ΠΡΟΓΡΑΜΜΑ ΘΕΜΑ_Δ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : I, J, pos, month
ΠΡΑΜΓΑΤΙΚΕΣ : Π[]10,12], Κ[10.12], ΕΠ[10], ΕΚ[10], ΕΕ[10], max, min
ΧΑΡΑΚΤΗΡΕΣ: ΟΝ[10,2]
ΑΡΧΗ
Για Ι από 1 μέχρι
10
Για J από 1 μέχρι 2
Διάβασε ΟΝ[Ι,J]
Τέλος_επανάληψης
Τέλος_επανάληψης
Για Ι από 1 μέχρι
10
Για J από 1 μέχρι 12
Διάβασε Π[Ι,J], Κ[Ι,J]
Τέλος_επανάληψης
Τέλος_επανάληψης
Για Ι από 1 μέχρι
10
ΕΠ[Ι] <-- 0
ΕΚ[Ι] <-- 0
Για J από 1 μέχρι 12
ΕΠ[Ι] <-- ΕΠ[Ι] + Π[Ι,J]
ΕΚ[Ι] <-- ΕΚ[Ι] + K[I,J]
Τέλος_επανάληψης
ΕE[Ι] <-- ( ΕΠ[Ι] – ΕΚ[Ι] ) * 0.55
Τέλος_επανάληψης
max <-- ΕΠ[1]
pos <-- 1
Για Ι από 2 μέχρι
10
Αν ΕΠ[Ι] > max τότε
max <-- ΕΠ[Ι]
pos <-- I
Τέλος_αν
Τέλος_επανάληψης
ΓΡΑΨΕ ΟΝ[pos,2]
ΚΑΛΕΣΕ ΕΣΟΔΑ(ΕΕ)
min <-- Π[1,1]
month <-- 1
Για Ι από 1 μέχρι
10
Για J από 1 μέχρι 12
Αν Π[Ι,J] < min τότε
min <-- Π[Ι,J]
month <-- I
Τέλος_αν
Τέλος_επανάληψης
Τέλος_επανάληψης
ΓΡΑΨΕ month
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ ΕΣΟΔΑ (Ε)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ
: I, J
ΠΡΑΓΜΑΤΙΚΕΣ
: E[10], temp
ΑΡΧΗ
ΓΙΑ Ι ΑΠΟ 2 ΜΕΧΡΙ 10
ΓΙΑ
J ΑΠΟ 10 ΜΕΧΡΙ Ι ΜΕ_ΒΗΜΑ -1
ΑΝ Ε[J-1] < Ε[J] ΤΟΤΕ
temp <-- Ε[J-1]
Ε[J-1] <-- Ε[J]
Ε[J] <-- temp
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 10
ΓΡΑΨΕ Ε[Ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Δεν υπάρχουν σχόλια:
Δημοσίευση σχολίου