Einzelnen Beitrag anzeigen

Rayzen

Registriert seit: 19. Sep 2005
5 Beiträge
 
#1

Re: Diagonale ausrechnen

  Alt 19. Sep 2005, 17:20
Huhu
wäre über eure Hilfe dankbar,
denn ich soll eine Konsolenanwendung schreiben und zwar sieht meine bisher folgendermaßen aus.

Delphi-Quellcode:
program rechteckuad;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var a,b,f,u,h:integer;
    qh,qb,la,lb:real;
begin
writeln ('Rechteckseiten eingeben');
writeln ('a='); Readln ( a );
writeln ('b='); Readln ( b );
f:=a*b;
Writeln ('Flächeninhalt f=', f);
readln;
writeln ('Seitenlängen eingeben für Umfang');
writeln ('Seite a='); Readln (u);
writeln ('Seite b='); Readln (b);
h:=2*u+2*b;
Writeln ('Umfang U=', h);
readln;
writeln ('Berechnung der Diagonale, bitte Breite und Höhe eingeben');
writeln ('Höhe'); Readln ( qh );
qh:=2*qh;
writeln ('Breite'); Readln ( qb );
qb:=2*qb;
writeln ('Ergebnis: '); Readln (la);
la:=qh+qb;
writeln ('Ergebnis2: '); Readln (la);
la:=sqrt

end.
Die Fehlermeldung ist:
Zitat:
[Fehler] rechteckuad.dpr(32): E2250 Es gibt keine überladene Version von 'Sqrt', die man mit diesen Argumenten aufrufen kann
Es klappt alles bis auf die Diagonalen Berechnung.
Nun weiß ich leider nicht wie ich das ändern bzw ausbessern könnte.

Mit freundlichen Grüßen
Rayzen
  Mit Zitat antworten Zitat