1. Delphi ортасында консольдық қосымшаны іске қосу үшін File | New | Оther командасын таңдаймыз.
2. Ашылған New Items терезесінен “Console Application” белгісін таңдап “OK” басамыз.
Writeln('Press Enter to exit...'); ReadLn;
3. Ашылған терезеде BEGIN және END кілттік сөздерінің арасына келесі жолды жазыңыз:
Delphi ортасында негізгі менюден Run | Run командасын таңдаймыз. Экранда қара терезе пайда болады.
Программа
мәтіні
Компилятор
директивасы
Қосылатын
модульдер
Өңдеу блогы
Сызықты программаның жазылуы
Консольдық қосымшада
program Project1;
{$APPTYPE CONSOLE}
var a,x,c,y:real;
Begin
Readln(a);
Readln(x);
Readln(c);
y:=(a*x+c);
Writeln(y);
Readln;
End.
Delphi ортасында procedure TForm1.Button1Click(Sender: TObject); var a,x,c,y:real; Begin a:=strtofloat(edit1.Text); x:=strtofloat(edit2.Text); c:=strtofloat(edit3.Text); y:=(a*x+c); label5.Caption:='жауабы’+'y='+floattostr(y); end; y:=(a*x+c) a, x, c басы Соңы у Read Readln Write Writeln Келесі операторларға сәйкес қолданылатын компоненттер
Edit компоненті InputBox функциясы Label компоненті Edit компоненті Memo компоненті Амалдарды орындау тәртібі
жақша ішіндегі өрнекті есептеу
солдан оңға қарай көбейту, бөлу, div, mod
солдан оңға қарай қосу және алу
z := (5*a*c+3*(c-d))/a*(b-c)/ b;
x:=(a*a+5*c*c-d*(a+b))/((c+d)*(d-2*a));
2 3 5 4 1 7 8 6 9
2 6 3 4 7 5 1 12 8 11 10 9
Тұрақтылар const
i2 = 45; { бүтін сан }
pi = 3.14; { нақты сан }
qq = ‘Алма'; { символдар қатары }
L = True; { логикалық шама }
бүтін және бөлшек бөліктері нүктемен ажыратылады
орыс, қазақ әріптерін қолдануға болады!
екі мән қабылдай алады:
True (ақиқат, «иә»)
False (жалған, «жоқ»)
Айнымалылар
Айнымалы – аты, типі және мәні болатын шама. Айнымалының мәнін программаның жұмысы кезінде өзгертіп отыруға болады.
Айнымалылардың типі:
integer { бүтін }
real { нақты }
char { бір символ }
string { символдық тіркес }
boolean { логикалық }
Айнымалыларды сипаттау (жад бөлу):
var a, b: integer;
Q: real;
s1, s2: string;