Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Sum & arithmetic mean in qbasic

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Otacom



Anmeldungsdatum: 18.06.2006
Beiträge: 45

BeitragVerfasst am: 20.09.2008, 17:24    Titel: Sum & arithmetic mean in qbasic Antworten mit Zitat

specification of a algorithm that having in input a vector of N
integers in providing output:
- sum of elements
- arithmetic means of vector

an example? thank ...
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
MisterD



Anmeldungsdatum: 10.09.2004
Beiträge: 3071
Wohnort: bei Darmstadt

BeitragVerfasst am: 20.09.2008, 18:13    Titel: Antworten mit Zitat

Code:
function sum(array() as integer, length as integer) as integer
dim n as integer
dim result as integer
for n = 0 to length-1
  result=result+array(n)
next n
sum=result
end function

function avg(array() as integer, length as integer) as single
avg  = sum(array,length) / length
end function


something like that?
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Otacom



Anmeldungsdatum: 18.06.2006
Beiträge: 45

BeitragVerfasst am: 20.09.2008, 18:47    Titel: Antworten mit Zitat

MisterD hat Folgendes geschrieben:
Code:
function sum(array() as integer, length as integer) as integer
dim n as integer
dim result as integer
for n = 0 to length-1
  result=result+array(n)
next n
sum=result
end function

function avg(array() as integer, length as integer) as single
avg  = sum(array,length) / length
end function


something like that?


ok, is it modular form?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
MisterD



Anmeldungsdatum: 10.09.2004
Beiträge: 3071
Wohnort: bei Darmstadt

BeitragVerfasst am: 20.09.2008, 20:13    Titel: Antworten mit Zitat

what do you mean by modular form? its two functions, sum is totally isolated and avg uses sum, no other requirements.
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Elektronix



Anmeldungsdatum: 29.06.2006
Beiträge: 742

BeitragVerfasst am: 20.09.2008, 23:52    Titel: Antworten mit Zitat

Perhaps when you post your question in
http://www.freebasic.net/forum/
you would get more answers, because they have no problems with answering in english.
zwinkern
_________________
Und die Grundgebihr is aa scho drin- DOS is jo nett.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Otacom



Anmeldungsdatum: 18.06.2006
Beiträge: 45

BeitragVerfasst am: 22.09.2008, 21:02    Titel: Antworten mit Zitat

Ok lächeln ...

OT: what is modular form? An example?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz