10 класс

программирование справочник

06/10

Понятие оператора, виды операторов. Организация интерфейса пользователя. Понятие переменной, типы данных

знакомимся с интерфейсом смотри видеоролик

типы данных смотри презентацию, ЧИТАЙ НА САЙТЕ

10/10

13/10

выражения и операторы Delphi

1. конспект

2. презентация к конспекту

3. практическая работа "ВИЗУАЛЬНОЕ ПРОГРАММИРОВАНИЕ" ПРОЕКТ "ВАШ ВЕС" (СТР. 30 СБОРНИК "ЗАБАРНАЯ") 

   ---

   17/10 Самостоятельная работа

   ---

   19/10

Тема: флажки и группы переключателей

смотрим презентацию "Элементы управления диалоговых окон" (папка Dropbox\школа\10 класс\Программирование)

начинаем создание многооконного проекта "Тест по географии" страница 56 сборника Забарная

сегодня на уроке:

1. ознакомиться с проектом

2. создать проект под названием test-geography-Yore Last Name

3. сегодня создаем визуальную часть до стр 56-61 пункты 1-12 инструкции

домашнее задание: §4 стр 159-205 Моделирование ветвящихся процессов ответить на контрольные вопросы стр 165

31/10

Тема: Реализация ветвления с использованием флажков и переключателей

пройти тест

домашнее задание:контрольные вопросы стр 165 (уч. часть 2)

03/11

Практическая  работа №3. Составление программ с использованием ветвления

Задание: создать проект "КОНВЕРТЕР ВАЛЮТЫ"

(ИНСТРУКЦИЯ: СМ. СБОРНИК "Визуальное программирование в Delphi" Автор Забарная А. стр. 33)

7/11 операторы цикла

ответить на вопросы:

 сколько раз повторяется цикл и чему равна переменная а

1) a := 1;

for i:=1 to 3 do a := a+1;

2) a := 1;

for i:=3 to 1 do a := a+1;

3) a := 4; b := 6;

while a < b do a := a + 1;

4) a := 4; b := 6;

while a < b do a := a - 1;

закончить выполнение программы "Конвертер валют"

критерии оценивания: 

"5"-программа работает и добавлен модуль для расчета суммы в гривнах

"4" - программа работает

"3" - создана форма, прописаны все коды, но есть ошибки

Домашнее задание: учебник, часть 2, стр. 212 - 213 ответить на вопросы 3, 11

10/11

Составление и программная реализация алгоритмов с циклами

пройти тест с вопросами по проекту "Конвертер валют"

добавить в проект возможность расчета суммы в гривнах по курсу доллара

создание теста в Delphi: 

1) https://www.youtube.com/watch?v=_T4VUO6LFCU

2) https://www.youtube.com/watch?v=uaW2wQcjpks

3) https://www.youtube.com/watch?v=_5Jecyl0fcc

14/11

практическая работа №4

привести программу "Конвертер валюты" к следующему виду:

добавьте программный код для получения суммы в рублях и в гривне.

листинг программы представлен ниже:

unit Unit1;
interface
uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, Buttons;
type
 TForm1 = class(TForm)
 Label1: TLabel;
 Label2: TLabel;
 Label3: TLabel;
 Edit1: TEdit;
 Edit2: TEdit;
 Edit3: TEdit;
 Button1: TButton;
 BitBtn1: TBitBtn;
 BitBtn2: TBitBtn;
 Label4: TLabel;
 Edit4: TEdit;
 Label5: TLabel;
 Edit5: TEdit;
 procedure Button1Click(Sender: TObject);
 procedure E1(Sender: TObject; var Key: Char);
 procedure E2(Sender: TObject; var Key: Char);
 procedure BitBtn1Click(Sender: TObject);
 private
 { Private declarations }
 public
 { Public declarations }
 end;
var
 Form1: TForm1;
 kurs_d_r, kurs_d_g, suma_dol, suma_grn, suma_rub:real;
implementation
{$R *.dfm}
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
edit1.text:=' ';edit2.Text:=' ';edit3.text:=' ';edit4.text:=' ';edit5.text:=' ';
bitbtn1.Enabled:=false;
button1.Enabled:=true;edit1.SetFocus
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
 kurs_d_r:=StrToFloat(Edit1.Text);
 kurs_d_g:=StrToFloat(Edit4.Text);
 suma_dol:=StrToFloat(Edit2.Text);
 suma_rub:=suma_dol*kurs_d_r;
 suma_grn:=suma_dol*kurs_d_g;
 Edit3.Text:=FloatToStr(suma_rub);
 edit5.Text:=FloatToStr(suma_grn);
end;
procedure TForm1.E1(Sender: TObject; var Key: Char);
begin
 case key of
 '0'..'9',chr(8):;
 ',':if pos(',',Edit1.Text)>0 then key:=chr(0);
 chr(13):begin edit2.SetFocus;end;
 else key:=chr(0);
 end;
end;
procedure TForm1.E2(Sender: TObject; var Key: Char);
begin
case key of
'0'..'9',chr(8):;
',':if pos(',',edit2.Text)>0 then key:=chr(0);
chr(13):begin button1.Enabled:=true;
bitbtn1.enabled:=true;
button1.SetFocus;edit3.Font.Color:=clred;end;
else key:=chr(0);
end;
end;
end.

пройти тест с вопросами по проекту "Конвертер валют"

17/11

Понятие массива. Одномерный массив. Ввод и вывод массива

Задание:

ответить на вопросы 1-12 стр 290-291(используем учебник стр. 282-290)

выполнить задания:

домашнее задание: читать §7.1, 7.2 стр. 282-296, выполнить задания: 16(а) стр. 296

21/11 Поиск данных в массиве, выбор элементов из массива по определенному критерию

информация взята с сайта http://old.kpfu.ru/student/t/delphibook/Chapter%205/1.htm

в конспекте ответить на вопросы:

1.  что такое массив
2. синтаксис объявления массива
3. примеры объявления массива
4. как происходит обращение к элементу массива в программе? приведите пример
5. перечислите типичные операции при работе с массивом?
6. прокомментируйте каждую строку  программы "Вывод массива" в среде Delphi

   ---

   01/12 Знакомимся со средой программирования VBA MS Office

• выполнить задания загрузи документ

• пройти тесты по Delphi

• ---