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, 3636 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 ..
Ähnliche Inhalte
Erkennung und -Abwehr
gelöst Traffic auf einem Rechner (7)

Frage von DeathNote zum Thema Erkennung und -Abwehr ...

Windows Userverwaltung
gelöst Rechner die nicht in der Domäne sind aufspüren (13)

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

Windows 10
gelöst Rechner fährt nicht vollständig runter (15)

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

Windows Server
Teamviewer am entfernten Rechner. (6)

Frage von DeathNote zum Thema Windows Server ...

Neue Wissensbeiträge
Linux Netzwerk

Ping und das einstellbare Bytepattern

Erfahrungsbericht von LordGurke zum Thema Linux Netzwerk ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(3)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
SAN, NAS, DAS
MSA 2050 RAID Konfig (21)

Frage von Leo-le zum Thema SAN, NAS, DAS ...

Netzwerkmanagement
Windows Server 2008 R2: "netsh reset" nicht verfügbar? (10)

Frage von RickTucker zum Thema Netzwerkmanagement ...

Netzwerkmanagement
Suche eine Software für Cloudverwaltung (6)

Frage von tsunami zum Thema Netzwerkmanagement ...

Google Android
Musik Wiedergabe am PC mit Smartphone über Bluetooth steuern (5)

Frage von justlukas zum Thema Google Android ...