Εισαγωγή στις Αρχές της Επιστήμης των Η/Υ - Τράπεζα Θεμάτων

ΘΕΜΑ Δ

Να αναπτύξετε αλγόριθμο ο οποίος:
Δ1. Να διαβάζει επαναληπτικά αριθμούς μέχρι να δοθεί ο αριθμός 0.
Μονάδες 5 Δ2. Να εμφανίζει στο τελος το πληθος των θετικών αριθμών που δόθηκαν.
Μονάδες 10 Δ3. Να εμφανίζει στο τελος το μέσο όρο όλων των αριθμών που δόθηκαν.
Μονάδες 10
  • Τέλος_αν
  • Τέλος ΘέμαΔ
  • πλ_θετικών ← 0
  • Αν πλ_αριθμών > 0 τότε
  • Εμφάνισε πλ_θετικών
  • sum_αριθμών ← 0
  • Όσο αριθμός <> 0 επανάλαβε
  • sum_αριθμών ← sum_αριθμών + αριθμός
  • Αλγόριθμος ΘέμαΔ
  • Αν αριθμός > 0 τότε
  • Εμφάνισε μο
  • Διάβασε αριθμός
  • Τέλος_αν
  • Τέλος_επανάληψης
  • πλ_αριθμών ← πλ_αριθμών + 1
  • μο ← sum_αριθμών / πλ_αριθμών
  • Διάβασε αριθμός
  • πλ_θετικών ← πλ_θετικών + 1
  • πλ_αριθμών ← 0