Quadratzahlen

Verfügbare Informationen zu "Quadratzahlen"

Qualität des Beitrags:

Beteiligte Poster: Christian

Forum: Ihr-Domainname.de

Forenbeschreibung: Beschreibung Ihres Forums

aus dem Unterforum: Technik

Antworten: 1

Forum gestartet am: Mittwoch 24.08.2005

Sprache: deutsch

Link zum Originaltopic: Quadratzahlen

Letzte Antwort: vor 18 Jahren, 4 Monaten, 12 Tagen, 1 Minute

Alle Beiträge und Antworten zu "Quadratzahlen"

Re: Quadratzahlen

Christian - 21.12.2005, 23:47

Quadratzahlen
Program Firlefanz;
USES CRT;
VAR Zahl :Real;
I, Ende, Ergebnis :Integer;

Begin
CLRSCR;
Write('Geben sie das Ende der Fahnenstange an: ');
Read(Ende);
For I:= 1 to Ende do
Begin;
Ergebnis:= I*I;
WriteLN(Ergebnis:8);
End;
Repeat until Keypressed;
End.

---

Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken

<a href="http://www.iphpbb.com/foren-archiv/5/275200/273880/quadratzahlen-87414589-16281-45.html" target="_blank">Quadratzahlen</a>

---

Weitere Beiträge aus dem Forum Ihr-Domainname.de

Versuchsprotokoll zu "Wasser als Lösungsmittel" - gepostet von derkleinemaddin am Freitag 24.02.2006
Mehr Rechenleistung für weniger Geld gibt es nicht! - gepostet von Christian am Donnerstag 15.06.2006

---

Ähnliche Beiträge wie "Quadratzahlen"