Live-Ticker
 Community
menu Registrieren menu Mitglieder Login menu Chat menu Flirtsuche menu Forum
 Schule & Uni
menu Referate / Hausarbeiten
 Informationen
menu FAQs
 Statistik
Mitglieder400.742
Neue User7
Männer197.445
Frauen196.466
Online0
Referate12.458
Forenbeiträge3.080.618
 Neue Mitglieder
  • Profilbild von MircoSupan

    Maennlich MircoSupan
    Alter: 43 Jahre
    Profil

  • Profilbild von Ra21

    Weiblich Ra21
    Alter: 18 Jahre
    Profil

  • Profilbild von TiLau

    Weiblich TiLau
    Alter: 31 Jahre
    Profil

  • Profilbild von judy85w

    Weiblich judy85w
    Alter: 31 Jahre
    Profil

  • Profilbild von Cximinvl

    Maennlich Cximinvl
    Alter: 21 Jahre
    Profil

  • Profilbild von Bella1

    Weiblich Bella1
    Alter: 31 Jahre
    Profil

  • Profilbild von pit2904

    Maennlich pit2904
    Alter: 69 Jahre
    Profil

  • Profilbild von basia1980

    Weiblich basia1980
    Alter: 37 Jahre
    Profil

  • Profilbild von Duru

    Weiblich Duru
    Alter: 21 Jahre
    Profil

  • Profilbild von Uscchi

    Weiblich Uscchi
    Alter: 37 Jahre
    Profil

     
Foren
Schule & Referate
Forum durchsuchen:

 
Thema:

Informatik

(185x 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.

Weitere interessante Beiträge aus dem Forum:
Referate Einbruch 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...

0 Mitglieder online