Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Операторы div и mod (практика) 8 класс
Содержание
- 1. Операторы div и mod (практика) 8 класс
- 2. Создаем новый проект:добавляем 4 кнопки, одно поле
- 3. Добавляем событие создания формы, прописываем случайную генерацию.procedure TForm1.FormCreate(Sender: TObject);begin //гарантирует случайность Randomize;end;
- 4. Добавляем событие нажатия кнопки «Случайное число», генерирует
- 5. Добавляем событие нажатия кнопки «Определяем составные единицы»,
- 6. Добавляем событие нажатия кнопки «Арифметика», рассчитывающую сумму и выводящую результат в Label7.procedure TForm1.Button3Click(Sender: TObject);begin //Сумма Label7.Caption:=Inttostr(StrToInt(Label1.Caption)+StrToInt(Label2.Caption));end;
- 7. Добавляем событие нажатия кнопки «Значение кратности», определяющую
- 8. Рабочий пример.
- 9. Для закрепления материала перейдите на страничкуhttp://http://оннаш.рф/%http://оннаш.рф/%d0%be%d0%bf%d0%b5%d1%80%d0%b0%d1%82%d0%be%d1%80%d1%8b-div-%d0%b8-mod/где будет сгенерировано индивидуальное задание.ВПЕРЕД
- 10. Скачать презентанцию
Создаем новый проект:добавляем 4 кнопки, одно поле ввода и 8 компонентов надписи;Размещаем согласно картинки;Подписываем форму и кнопки.
Слайды и текст этой презентации
Слайд 2
Создаем новый проект:
добавляем 4 кнопки, одно поле ввода и 8
компонентов надписи;
Размещаем согласно картинки;
Подписываем форму и кнопки.
Слайд 3
Добавляем событие создания формы, прописываем случайную генерацию.
procedure TForm1.FormCreate(Sender: TObject);
begin
//гарантирует
случайность
Randomize;
end;
Слайд 4
Добавляем событие нажатия кнопки «Случайное число», генерирует и записывает в
окно ввода Edit1 двузначное число.
procedure TForm1.Button1Click(Sender: TObject);
begin
//Задаем случайное двузначное
числоEdit1.Text:=inttostr(Random(89)+10);
end;
Слайд 5
Добавляем событие нажатия кнопки «Определяем составные единицы», дробит число на
единицы, используя операторы div и mod.
procedure TForm1.Button2Click(Sender: TObject);
begin
//десятки
Label1.Caption:=Inttostr(StrToInt(Edit1.Text)
div 10);//единицы
Label2.Caption:=Inttostr(StrToInt(Edit1.Text) mod 10);
end;
Слайд 6
Добавляем событие нажатия кнопки «Арифметика», рассчитывающую сумму и выводящую результат
в Label7.
procedure TForm1.Button3Click(Sender: TObject);
begin
//Сумма Label7.Caption:=Inttostr(StrToInt(Label1.Caption)+
StrToInt(Label2.Caption));
end;
Слайд 7
Добавляем событие нажатия кнопки «Значение кратности», определяющую четность (не четность)
случайного числа.
procedure TForm1.Button4Click(Sender: TObject);
begin
//определение четности
if (StrToInt(Edit1.Text) mod 2)
= 0 thenLabel8.Caption:='Четное' else
Label8.Caption:='Не четное';
end;
Слайд 9
Для закрепления материала перейдите на страничку
http://http://оннаш.рф/%http://оннаш.рф/%d0%be%d0%bf%d0%b5%d1%80%d0%b0%d1%82%d0%be%d1%80%d1%8b-div-%d0%b8-mod/
где будет сгенерировано индивидуальное задание.
ВПЕРЕД
