Készíts programot, amely bekér 50 számot és kiszámolja a negatívok szorzatát illetve a pozitívok összegét. - hogyan lehet megoldani?

Kár, hogy ebben semmilyen LinKer nincs :D

Sima összegzés tétel, kétszer alkalmazva (ha már annyira ragaszkodunk a tételesdihez) :D

@#12:

Ne légy már ilyen könyörtelen. Nekem lágyabb szívem van:

const nem_meg_nem_volt = 0

const igen_mar_volt = 1

dim negativ_szamok_szorzata as longint

dim pozitiv_szamok_osszege as integer

dim szam as byte, hanyadiknal_tartunk as byte, volt_negativ as byte

dim szoveg as string

volt_negativ = nem_meg_nem_volt

for hanyadiknal_tartunk = 1 to 50

      print hanyadiknal_tartunk;

      input ". szám: ", szam

      if szam < 0 then

            if volt_negativ = nem_meg_nem_volt then

                  negativ_szamok_szorzata = szam

                  volt_negativ = igen_mar_volt

            else

                  negativ_szamok_szorzata = negativ_szamok_szorzata * szam

            end if

      else

            pozitiv_szamok_osszege = pozitiv_szamok_osszege + szam

      end if

next hanyadiknal_tartunk

print pozitiv_szamok_osszege, negativ_szamok_szorzata

print "Érdemes volt 50 számot begépelned."

Ez még nekem is megy :D (de lehet egy picit ronda lenne a kód :D)

50Ft lesz

(az elírás jogát fenntartom)