Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Rechner in Pascal

Frage Entwicklung

Mitglied: itbeginner

itbeginner (Level 1) - Jetzt verbinden

05.03.2008, aktualisiert 06.03.2008, 3589 Aufrufe, 1 Kommentar

Hi,
ich Habe in Pascal ein Rechnerprogramm erstellt mit dem man +-*/ rechnen können sollte , aber es klappt nicht ganz es wird immer Plus gerechnet.

program Taschenrechner;
var Zahl1 : real;
var Zahl2 : real;
function plus

begin
plus := Zahl1 + Zahl2 ;
end;
function minus
begin
minus := Zahl1 - Zahl2 ;
end ;
function mal

begin
mal := Zahl1 * Zahl2 ;
end;
function geteilt

begin
geteilt := Zahl1 / Zahl2 ;
end;
function wählen
begin
if (plus) then
begin
writeln(plus);
end
else
begin
writeln(minus);
end;
if (mal) then
begin
writeln(mal);
end
else
begin
writeln(geteilt);
end;
end;

begin
write('Wählen sie Zahl1:') ;
readln(Zahl1) ;
write('Wählen sie Zahl2:') ;
readln(Zahl2) ;
write('Wählen sie eine Rechenart aus')
witeln(wählen) ;
readln ;
end.
Außerdem hab ich keine richtige Ahnung wie ich dem Programm erkläre , dass ich zwischen +-*/ wählen kann und es dann mit dem dem entsprechenden Rechenzeichen rechnet.
lg itbeginner
Mitglied: erikro
06.03.2008 um 19:32 Uhr
Hallo,

wird man im Studium immer noch mit Pascal gequält bevor man an die richtigen Programmiersprachen darf. ;)

Es ist zwar schon ewig lange her und das Meiste dürfte ich vergessen habe. Daher hier nur ein Hinweis: Ich vermisse irgendwie den Aufruf der Funktionen. Der User hat die Zahlen eingegeben und nu?

Wie Du die Weichen machst, dass das Programm entscheidet, welche Funktion? Na mit if ... elseif ... else oder mit einer case-Anweisung. Wie das in Pascal geht habe ich wirklich vergessen.

hth

Liebe Grüße

Erik
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Windows 10
gelöst Rechner fährt nicht vollständig runter (15)

Frage von M.Marz zum Thema Windows 10 ...

CPU, RAM, Mainboards
Wo finde ich Chipsatztreiber für älteren HP- Rechner (4)

Frage von peisi51 zum Thema CPU, RAM, Mainboards ...

Heiß diskutierte Inhalte
Hardware
Laptop ins Salzwasser gefallen (18)

Frage von Marcel94 zum Thema Hardware ...

Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (13)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...

Hardware
Lenovo Yoga 500 über angeschlossene USB Tastatur booten (13)

Frage von thomasreischer zum Thema Hardware ...

Viren und Trojaner
Wie werde ich den Mist "fanli90" wieder los? (12)

Frage von Taumel zum Thema Viren und Trojaner ...