- •Зертханалық жұмыс №1
- •Зертханалық жұмыс №2
- •2. Delphi негізгі терезесі
- •4. Объектілер инспекторы терезесі
- •Зертханалық жұмыс №3
- •Өзіндік жұмыс тапсырмалары
- •Зертханалық жұмыс №4
- •Зертханалық жұмыс №5
- •Зертханалық жұмыс №6
- •Зертханалық жұмыс №8
- •Зертханалық жұмыс №9
- •Зертханалық жұмыс №10
- •Зертханалық жұмыс №11
- •Зертханалық жұмыс №12.
- •Зертханалық жұмыс №13.
- •Зертханалық жұмыс №14
- •Зертханалық жұмыс №15
- •Зертханалық жұмыс № 16
- •Зертханалық жұмыс №17
- •3.Қорғалған блок механизмі.
- •Зертханалық жұмыс №18
- •Зертханалық жұмыс №19
- •Зертханалық жұмыс № 20
- •Зертханалық жұмыс №21
- •Зертханалық жұмыс №22
- •Зертханалық жұмыс №23
- •Зертханалық жұмыс №24
- •Зертханалық жұмыс №25
- •Зертханалық жұмыс №26
- •Зертханалық жұмыс №27
- •Зертханалық жұмыс №28
- •Зертханалық жұмыс № 29
Өзіндік жұмыс тапсырмалары
№ |
Тапсырмалар |
1. |
Арифметикалық өрнектердің мәндерін есептеу үшін меншіктеу операторларын қолданыңдар: p=2,6х3+4,2х2-1,8х |
2. |
|
3. |
|
4. |
Берілген
x,y. Табу керек: Z.
|
5. |
х =2a2+3b-c |
Бақылау сұрақтары:
1. Label1компонентінің қызметі қандай?
2. Text1 компонентінің қызметі қандай?
3. CommandButton1 компонентінің қызметі қандай?
4. Сызықтық алгоритм дегеніміз не?
5. Алгоритм дегіміз не?
6. Алгоритмнің неше түрі бар?
Әдебиеттер:
1. А. Я. Архангельский. Delphi 7.
2. М.М. Ерекешова, Т.А.Әмірғалиева Delphi ортасында программалау негіздері
3. Ю.А.Шпак Delphi 7 на примерах
4. К.З.Халықова Программалау тілдерін оқыту (Delphi)
Зертханалық жұмыс №4
Тақырыбы: Delpfi парграммалау ортасында есептер шығару
Сызықтық алгоритмдер
Мақсаты: Delpfi парграммалау ортасында есептер шығарып үйрену;
Қажетті құралдар: 1. ДК /Pentium 3,4 Windows /
2. Borland Delphi 7.0
Тапсырмалар
Берілген формулалар бойынша есептеулер жүргізу
А=(x3+sin(xy)+y3)/(cos(ln x+1))
Жұмысты орындалу реті
Borland Delphi 7.0 бағдарламалау тілін іске қосыңыз
Delpfi – ді қосқанда автоматты түрде қосылатын формаға екі Edit, үш Label және бір Button компонентін орналастырыңыз
Алдын ала жоба файылын және модуль файылын сақтап алыңдар:
File/Save Projekt As…, File/Save As…, File/Save Al…
Компоненттерге келесі қасиеттерді меншіктеңіз
Компоненттер |
Қасиеттері |
Мәндері |
Button1 Edit1 Edit1 Label1 Label2 Label3 |
Caption Text Text Caption Caption Caption |
Есептеу Бос Бос X Y A= |
Бағдарлама кодын енгізіңіз
Procedure TForm1. But1Click (Sender: TQbject);
var x,y:integer;
Begin
x:=StrToInt(InputBox (‘x-ті енгіз’,’’));
y= (2*sqr(x))+3;
ShowMessage (‘y-тің мәні’+IntToStr(y));
end;
end.
Бағдарлама кодының дұрыстығына көз жеткізіп, F9 тетігін басу арқылы бағдарламаны іске қосыңыз.
Құрылған бағдарламаны сақтап, оқытушыға істелген жұмыс бойынша есеп беріңіз
ЖАТТЫҒУЛАР
Берілген өрнектердің бағдарламасын құрып, мәндерін есептеңдер
Төрт сыныптың оқушыларына х га ауданна өнім жинау тапсырылды.Әр
сыныптағы оқушылар саны белгілі.Әр сынып оқушылары қанша гектар жердің өнімін жинау керек?
Егер 1 м2 жерді сырлауға х грамм бояу кететін болса, онда үстел бетін
сырлауға қанша грамм бояу керек болады
Трапецияның a,b қабырғалары және h биіктігі берілген. Трапецияның ауданын
анықтау қажет.
Табан дөңгелегінің радиусы R, биіктігі h болатын цилиндрдің толық беті мен
көлемін
табу.
V=R2h,
мұндағы R және h пернетақтадан енгізіледі,
ал =3,14.
Шеңбердің радиусының өлшемі берілген, оның ауданын
анықтау қажет.
Бір қалыпты үдемелі қозғалыстағы дененің бастапқы жылдамдығы, бастапқы жолы және үдеуі белгілі. Дененің t-шы уақытта жүріп өткен жолын есепте.
Бақылау сұрақтары
Delpfi – ді қолдану арқылы қандай әрекеттер жасауға болады?
Delpfi – ді бағдарламалау ортасы қандай элементтерден тұрады?
Форма деген не?
Программа коды орналасқан терезе қалай аталады?
Код бағытын көрсететін терезе қайда орналасады?
Есеп беруге нұсқау
Есеп беру келесілерді қамтуы керек:
Жұмыстың тақырыбы мен мақсаты;
Тапсырмалар мен жаттығулардың орындалуы;
Дайындалған бағдарлама;
Жұмыс бойынша қысқаша қорытынды
Әдебиеттер
1. А. Я. Архангельский. Delphi 7.
2. М.М. Ерекешова, Т.А.Әмірғалиева Delphi ортасында программалау негіздері
3. Ю.А.Шпак Delphi 7 на примерах
4. К.З.Халықова Программалау тілдерін оқыту (Delphi)
