Cum Se Scrie Un Program De Calculator

Cuprins:

Cum Se Scrie Un Program De Calculator
Cum Se Scrie Un Program De Calculator

Video: Cum Se Scrie Un Program De Calculator

Video: Cum Se Scrie Un Program De Calculator
Video: Limbajul de programare C | Cum scrii un program pe calculator (III) 2024, Noiembrie
Anonim

Programul calculatorului este una dintre sarcinile tipice de programare. O astfel de aplicație poate fi implementată în aproape orice limbaj de programare. Unul dintre cele mai populare limbaje de programare este Delphi, care poate fi folosit pentru a scrie cod de calculator simplu și eficient.

Cum se scrie un program de calculator
Cum se scrie un program de calculator

Necesar

Mediul de programare Delphi

Instrucțiuni

Pasul 1

Porniți mediul de programare Delphi pe care îl utilizați. Planificați interfața pentru aplicația dvs. Vor fi 26 de butoane pe formular, dintre care 10 sunt responsabile pentru numere, iar restul sunt pentru funcții. În plus, va exista o componentă TPanel pe care va fi afișat rezultatul acțiunii.

Pasul 2

Adăugați 4 variabile la cod care vor stoca numerele introduse de utilizator și determinați modul. De exemplu:

var

a, b, c: real; // numerele pe care le introduce utilizatorul

d: întreg; // acțiunea calculatorului

Pasul 3

Variabilele create pot fi adăugate atât la cele protejate, cât și la cele private. Acum gestionați evenimentul OnClick pentru fiecare buton numeric. Pentru toate cifrele, codul va fi identic:

procedura TForm1. Button1Click (Expeditor: TObject);

începe

Panel1. Caption: = Panel1. Caption + „număr”

Sfârșit;

Înlocuiți „numărul” cu numele butonului (dacă este numărul 0, apoi Panel1. Caption + '0').

Pasul 4

Variabila d este în format întreg și va conține valoarea numerică corespunzătoare a oricărei acțiuni. Dacă se va efectua multiplicarea, atunci puteți seta acțiunea la valoarea 1, dacă diviziunea - valoarea 2, dacă adunarea - valoarea 3 etc. Pentru acțiunea de multiplicare, codul va arăta astfel:

procedura TForm1. ButtonMultiplyClick (Expeditor: TObject); // multiplicați acțiunea

începe

a: = StrToFloat (Panel1. Caption); // după apăsarea butonului, se salvează valoarea variabilei a

d: = 1; // variabila de acțiune este setată la valoarea corespunzătoare

Panel 1. Caption: = ;

Sfârșit;

Pasul 5

Efectuați operațiuni similare pentru divizare (ButtonDivClick), adunare (ButtonPlusClick), scădere (ButtonMinusClick) și exponențiere (ButtonPowerClick).

Pasul 6

Pentru a procesa valoarea „=”, trebuie să creați o condiție de caz și să luați în considerare fiecare acțiune la rândul său:

procedura TForm1. ButtonClick (Expeditor: TObject);

începe

caz d de

1: începe // dacă d = 1, adică butonul de multiplicare este apăsat, atunci are loc acțiunea corespunzătoare

b: = StrToFloat (Panel1. Caption);

c: = a * b;

Panel1. Caption: = FloatToStr (c);

Sfârșit;

2: începe

a: = StrToFloat (Panel1. Caption);

c: = a / b;

Panel1. Caption: = FloatToStr (c);

Pasul 7

Manevrați adunarea, scăderea și exponențierea în același mod. Calculatorul este gata.

Recomandat: