Community
menu Registrieren menu Mitglieder Login menu Chat menu Flirtsuche menu Forum
 Schule & Uni
menu Referate / Hausarbeiten
 Informationen
menu FAQs
 Statistik
Mitglieder401.275
Neue User0
Männer197.667
Frauen196.777
Referate12.458
Forenbeiträge3.080.734
 Neue Mitglieder
  • Profilbild von richard7

    Maennlich richard7
    Alter: 27 Jahre
    Profil

  • Profilbild von maxi810

    Weiblich maxi810
    Alter: 44 Jahre
    Profil

  • Profilbild von Camobaum

    Maennlich Camobaum
    Alter: 15 Jahre
    Profil

  • Profilbild von Aminhadad

    Maennlich Aminhadad
    Alter: 21 Jahre
    Profil

  • Profilbild von Bonzo03

    Maennlich Bonzo03
    Alter: 14 Jahre
    Profil

  • Profilbild von its

    Weiblich its
    Alter: 25 Jahre
    Profil

  • Profilbild von hannnsiiii

    Maennlich hannnsiiii
    Alter: 31 Jahre
    Profil

  • Profilbild von Frodo3

    Maennlich Frodo3
    Alter: 25 Jahre
    Profil

  • Profilbild von jojoxivii

    Weiblich jojoxivii
    Alter: 16 Jahre
    Profil

  • Profilbild von daserdbeer

    Maennlich daserdbeer
    Alter: 28 Jahre
    Profil

     
Foren
Schule & Referate
Forum durchsuchen:

 
Thema:

Informatik

(201x gelesen)

Seiten: 1

Du mußt dich registrieren, bevor Du einen Beitrag bzw. eine Antwort erstellen kannst.

Beitrag von Buengi

18.01.2006 17:20:23

Buengi

Buengi hat kein Profilbild...

Themenstarter
Buengi hat das Thema eröffnet...

hi @all.
also wir sollen in info so ein prog schreiben. allerding weiß ich jetzt nicht genau was in die letzte procedure reinkommt damit das geht. wisst ihr das vll (hab nen pfeil dahin gemacht, wo mir was fehlt).
thx

procedure teiler (z1:integer;VAR E:integer);
var t:integer;
begin
e:=0;
t:=0;
Repeat
if z1 mod t=0 then
E:=e+t;
t:=t+1;
Until
t=z1;
end;

procedure primzahl(z:integer;VAR prim:boolean);
VAR e:integer;
begin
teiler(z,e);
if z+1=e then
prim:=true
else
prim:=false;
end;

procedure TForm1.BtrechneClick(Sender: TObject);
VAR z:integer;
begin

<-- was muss hier rein

end;

end.

Profil | Livenachricht | SMS senden | Gästebuch | Nachricht | Bildergalerie


Beitrag von Buengi

18.01.2006 17:27:00

Buengi

Buengi hat kein Profilbild...

Themenstarter
Buengi hat das Thema eröffnet...

push

Profil | Livenachricht | SMS senden | Gästebuch | Nachricht | Bildergalerie


Seiten: 1

Du mußt dich registrieren, bevor Du einen Beitrag bzw. eine Antwort erstellen kannst.

Informatik
Weitere interessante Beiträge aus dem Forum:
Referate Trump Informatik algorithmus
Facharbeit in Informatik
zahlensystem informatik
Informatik ... EDV
TECHNISCHE INFORMATIK
ABI Informatik mündlich


Dein Live Messenger LiveMessenger

Diese Funktion ist nur für Mitglieder verfügbar.

Anmelden | Login

Keine neue Nachricht
Jetzt Gratis bei Pausenhof.de registrieren...

136 Mitglieder online