понедельник, 8 декабря 2025 г.

Форматирование абзацев

ПРЕЗЕНТАЦИЯ


ПРАКТИЧЕСКАЯ РАБОТА

Файл


Составление алгоритмов для работы с графикой

ПРЕЗЕНТАЦИЯ К УРОКУ

ПРАКТИЧЕСКАЯ РАБОТА

Задание 3. Измените предыдущую программу так, чтобы круги рисовались радиусом на 100 пикселей больше. И должно быть расстояние между кругами.

Задание 4. Составьте программу, которая рисует вертикальный ряд прямоугольников.
Наводящие вопросы:
1. Какая команда позволяет нарисовать прямоугольник?
2. Что надо знать, чтобы нарисовать прямоугольник?
3. Что меняется при рисовании каждого последующего прямоугольника? Какие именно координаты?
4. Можно ли связать y rоординату левого верхнего угла и у координату правого нижнего правого? 
у координата правого верхнего угла=у координата левого верхнего угла +число


Задание 5. Составьте программу, которая рисует два ряда: сначала вертикальный ряд кругов, а затем горизонтальный ряд прямоугольников.

Понятие электронной таблицы. Структура таблицы. Типы данных

 

 ПРЕЗЕНТАЦИЯ К УРОКУ

Файл для работы


ИГРАЕМ






Создание таблиц базы данных. Ввод и редактирование данных

 

ИГРАЕМ 


ПРЕЗЕНТАЦИЯ К УРОКУ



ПРАКТИЧЕСКАЯ ЧАСТЬ

Задание 1. Запустите Microsoft Access и создайте новую базу данных. Сохраните файл в папку D:\ученики\10А, Б Имя файла Новый год фамилия.

Задание 2-3. На основании информации  ниже создайте таблицу Деды Морозы. Перед выполнением задания прочитайте, пожалуйста, вопросы ниже (зелёным цветом).

  1. Зюзя (Беларусь). Место жительства - лес. Приносит подарки 31 декабря.
  2. Дед Мороз (Россия). Место жительства - Великий Устюг. Помощница Снегурочка. Приносит подарки 31 декабря.
  3. Кыш-Бабай (Татарстан). Место жительства -  лесу.  Помогает дочка Кар Кызы. Приносит подарки 31 декабря.
  4. Санта Христиан (Африка). Живёт на вершине Килиманджаро. Приносит подарки 24 декабря.
  5. Микулаш (Чехия). Сопровождает ангел в белоснежной одежде и лохматый чертёнок.  Приносит подарки 5 декабря.
  6. Баббо Натале. (Италия). Живёт в Лапландии. Помогает   фея Бефана. Приносит подарки 24 декабря.
  7. Йоулупукки (Финляндия). Живёт в Лапландии.  Жена Муори. Приносит подарки 24 декабря.

    Информация из свободных источников интернета. Я не была во всех странах и на деле её не проверяла :) 

Вопросы перед выполнением задания

  1. Какие поля вы включите в таблицу? Какие типы у них будут?
  2. Сколько полей у вас получилось? У меня получилось 5 полей.  Если у вас другое количество полей, обсудите с одноклассником или учителем.
  3. Какое или какие поля  вы сделаете ключевыми? Имена Делов Морозов в разных странах могут совпадать. 

Задание 4. 

1. Добавьте в таблицу поле Изображение. Файлы с изображениями Дедов Мороза расположены в папке D:\для занятий\СУБД\Создание баз данных\Дед Мороз.

2. Внесите в таблицу информацию о Деде Морозе любой страны, которую я не брала.


Задание 5. Подумайте, какую таблицу вы бы могли добавить в базу данных Новый год.  Это может быть даже ваша фантазия. Добавьте её. Таблицы должны иметь связь по какому-то полю.

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

1. От 4 полей.

2. От 3 записей.

понедельник, 1 декабря 2025 г.

Форматирование символов

 

 ПРЕЗЕНТАЦИЯ


ПРАКТИЧЕСКАЯ ЧАСТЬ

Файл Форматирование символов

Понятие базы данных: поля, записи. Назначение системы управления базами данных (СУБД)

ПРЕЗЕНТАЦИЯ К УРОКУ


ИГРАЕМ СЕЙЧАС


ИГРАЕМ

Обобщающее занятие по теме «Алгоритмы обработки строковых величин»

ПРЕЗЕНТАЦИЯ К УРОКУ

Задача. Заменить в тексте слово «ноябрь» на «декабрь».  Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.

var s:string;

    ns:integer;

begin

  readln(s);

  ns:=pos('... ',s);{ищем  слово, которое будем заменять}

  while ns>0 do {повторяем действия пока в тексте есть это слово}

             begin

             ... {удаляем слово}

             ...('...',s,...);{вставляем новое слово}

             ...{ищем снова слово}   

            end;

writeln(s);                          

end.


ТЕСТ


ПРАКТИЧЕСКАЯ ЧАСТЬ

Задание 1. Запустите Паскаль.
 
Задание 2. Выполнить программу. Определить, что она делает.

var s, i: string;
     np:integer;
begin
    writeln('Введите имя и фамилию в строку через пробел');
    readln(s);
    np:=pos(' ',s);
    i:=copy(s,1,np-1);
    writeln(i);
end.

Задание 3. Составить программу, которая запрашивает число и месяц рождения вашего рождения. Затем выводит только число. В числе может быть как одна цифра, так и две.

Пример: 
Ввод: 17 мая
Вывод: 17 

Задание 4. Составить программу, которая запрашивает число,  месяц и год вашего рождения. Затем выводит год вашего рождения. Число, месяц могут записываться как одной, так и двумя цифрами.  

Пример: 
Ввод: 17.11.2005
Вывод: 2005

Задание 5. Составить программу, которая выводит слова, начинающиеся и заканчивающиеся одной и той же буквой.

Составление алгоритмов для работы с графикой

ПРЕЗЕНТАЦИЯ К УРОКУ

ПРАКТИЧЕСКАЯ РАБОТА

Задание 1. Запустите PascalAbcNet

Задание 2. Составить программу для получения следующего изображения. Расстояние между линиями задайте сами.



Задание 3. Измените предыдущую программу так, чтобы линии рисовались чаще.

Задание 4. Составьте программу для получения следующих изображений. 

Наводящие вопросы:

  1. Какая команда позволяет рисовать круги? Стр. 159
  2. Что нам надо знать, чтобы нарисовать круг?
  3. Что у нас будет оставаться постоянным? Центр круга может совпадать с центром экрана.
  4. Что будет изменяться? 
  5. Начать рисовать лучше с большего круга, иначе большие  круги  будут перекрывать меньшие.
uses graphabc;
var ...:integer;
begin
set....

r:=...{максимальный радиус}

while r>=...{самый маленький радиус} do
                    begin
                     c....(..,..,...);                     ;
                     r:=... {r уменьшается}

                    end;



Задание 5. Составить программу для получения следующих изображений. 


понедельник, 24 ноября 2025 г.

Составление алгоритмов обработки строковых величин

 Проверяем знания

ПРЕЗЕНТАЦИЯ К УРОКУ


Задача 1. В строке вида логин:пароль@сервер. Заменить каждый символ пароля *.

Ввод:
masha:123456@qwe.biz
Вывод:
masha:******@qwe.biz




РЕШЕНИЕ ЗАДАЧ
Задача 2. Набрать и выполнить программу для решения классной задачи.
var s:string; n,nd,ns:integer; begin writeln('Введите строку вида логин:пароль@сервер');

Задача 3. Дана строка вида имя пользователя@логин#пароль/ник Замените каждый символ пароля %


Задача 4.
Разберите решение задачи.
Задача. Дана строка вида. Посчитайте сколько цифр в строке.

var s:string;
     k, m:integer {кол-во цифр в строке};
begin
writeln('Введите строку');
  readln(s);
  k:=0;
  for m:=1 to length(s) do
                                   if (s[m]>=’0’) and (s[m]<=’9’) then k:=k+1 ; {если символ цифра, то увеличиваем кол-во на 1}
  writeln(k);

end.


Решите задачу. Дана  строка символов. Проверить, является ли строка записью целого числа. Число вводится без пробелов.
Примеры
Ввод:
100010
Вывод:
является
Ввод:
27 арбузов
Вывод:
не является

Подсказка.
1. Если ввели только цифры, то количество цифр совпадёт с длиной строки.

Задача 5. Дана  строка символов. Проверить, является ли строка записью числа. Число может быть записано с пробелом, например, 100 000, число может быть дробным, например, 5,2

Примеры
Ввод:
100010
Вывод:
является
Ввод:
11,5
Вывод:
является
Ввод:
27 арбузов
Вывод:
не является


ДЗ
Задача. Проверить, является ли строка записью числа римскими цифрами.
Ввод:
XХIV
Вывод:
является
Ввод:
Лето 2000 года
Вывод:

не является

Работа с фрагментами

ИГРАЕМ И ПОВТОРЯЕМ

 
ПРЕЗЕНТАЦИЯ


ПРАКТИЧЕСКАЯ ЧАСТЬ

Копировать многим сложно. Надо полумать, как ещё можно научить.

Откройте файл  работа  с фраментами в папке D:\для занятий\6 класс\ТР. Открыть вам поможетг команда Файл/Открыть. Выполняйте задания из файла. 

ИТОГИ УРОКА

 

Составление алгоритмов обработки строковых величин

 

Проверяем знания

ПРЕЗЕНТАЦИЯ К УРОКУ


Задача 1. В строке вида логин:пароль@сервер. Заменить каждый символ пароля *.

Ввод:
masha:123456@qwe.biz
Вывод:
masha:******@qwe.biz




РЕШЕНИЕ ЗАДАЧ
Задача 2. Набрать и выполнить программу для решения классной задачи.

Задача 3. Дана строка вида имя пользователя@логин#пароль/ник Замените каждый символ пароля %


Задача 4.
Разберите решение задачи.
Задача. Дана строка вида. Посчитайте сколько цифр в строке.

var s:string;
     k, m:integer {кол-во цифр в строке};
begin
writeln('Введите строку');
  readln(s);
  k:=0;
  for m:=1 to length(s) do
                                   if (s[m]>=’0’) and (s[m]<=’9’) then k:=k+1 ; {если символ цифра, то увеличиваем кол-во на 1}
  writeln(k);

end.


Решите задачу. Дана  строка символов. Проверить, является ли строка записью целого числа. Число вводится без пробелов.
Примеры
Ввод:
100010
Вывод:
является
Ввод:
27 арбузов
Вывод:
не является

Подсказка.
1. Если ввели только цифры, то количество цифр совпадёт с длиной строки.

Задача 5. Дана  строка символов. Проверить, является ли строка записью числа. Число может быть записано с пробелом, например, 100 000, число может быть дробным, например, 5,2

Примеры
Ввод:
100010
Вывод:
является
Ввод:
11,5
Вывод:
является
Ввод:
27 арбузов
Вывод:
не является


ДЗ
Задача. Проверить, является ли строка записью числа римскими цифрами.
Ввод:
XХIV
Вывод:
является
Ввод:
Лето 2000 года
Вывод:

не является

Обобщающее повторение по теме «Алгоритмы обработки массивов»

 ПРЕЗЕНТАЦИЯ К УРОКУ


ТЕСТ

Оператор цикла с условием

  ПРЕЗЕНТАЦИЯ К УРОКУ

while условие do команды;

>

<

=

<>

>=

<=



Формат команды «While»:

while условие do оператор; 

При выполнении команды «While» сначала проверяется условие. Если оно истинно, то выполняются команды, входящие в тело цикла, затем условие проверяется снова, и т. д. Таким образом, команды цикла выполняются до тех пор, пока условие истинно. Если условие ложно, то цикл заканчивается.


Задание. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл ноль. Найдите сумму введённых чисел.


СОСТАВЛЕНИЕ ПРОГРАММ


Задание 1. Запустите PascalAbcNet

Задание 2. Набрать и выполнить программу, которую делали в классе.


Задание 3. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл 7. 

Задание 4. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл любое отрицательное число . 

Задание 5. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл любое отрицательное число. Сколько чисел успели ввеcти? 

Подсказка.  

1. Как изменяется количество чисел при каждом введённом числе? 2. Сколько раз у нас количество увеличивается на 1?



воскресенье, 23 ноября 2025 г.

Алгоритм с ветвлением (профиль)

Задание 1. Компьютер спрашивает, сколько  книг ты читаешь в месяц?  Если больше 2, то на экране появляется надпись «Хорошо!», иначе «Может, стоит читать больше?». 
Используйте команду для русского языка в консоли setlocale(LC_ALL,"Russian");

Задание 2. Вводится число. Надо определить, является ли оно трёхзначным.

СОСТАВЛЕНИЕ ПРОГРАММ

Задание 2. Компьютер спрашивает, сколько  книг ты читаешь в месяц?  Если больше 2, то на экране появляется надпись «Хорошо!», иначе «Может, стоит читать больше?». 

Задание 3.  Составьте программу, определяющую, является ли введённое число двузначным. 

Задание 4. В магазине Вам надо заплатить N рублей. Вы подаете продавцу m купюр по k рублей. Определите надо ли вам дать сдачу?

Задание 5. В магазине Вам надо заплатить N рублей. Вы подаете продавцу m купюр по k рублей. Определите сколько денег Вам надо добавить или сколько Вам должны дать сдачи.

ДОМАШНЕЕ ЗАДАНИЕ

Задание.  Составьте программу, которая запрашивает ваш возраст. И если возраст меньше 6, пишет: «Так вы ещё совсем юны!»

вторник, 18 ноября 2025 г.

Цикл с параметром 8 класс (профиль)

  1. Составьте программу для нахождения суммы чисел от 1 до 100.
  2. Составьте программу для нахождения суммы чисел от самого маленького числа в вашей дате рождения до самого большого. Например, 22.09.2000. Значит надо найти сумму чисел от 9 до 2000.
  3. Составьте программу для нахождения суммы кубов чисел от самого маленького числа в вашей дате рождения до среднего. Например, 22.09.2000. Значит надо найти сумму чисел от 93+103+...223
  4. Валентина прогуляла лекцию по математике. Преподаватель решил подшутить над нерадивой студенткой и попросил ее на практическом занятии перечислить все положительные делители некоторых целых чисел. Для несложных примеров студентка быстро нашла решения (для числа 6 это: 1, 2, 3, 6; а для числа 16 это: 1, 2, 4, 8, 16), но этим все не закончилось. На домашнее задание ей дали варианты посложнее: 23436190187200380457890232Решить такое вручную, как вы понимаете, практически нереально. Вот Валентина и обратилась к вам за помощью.

понедельник, 17 ноября 2025 г.

Цикл с предусловием 8 класс (профиль)

 

Задание 1. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь введет ноль. Найдите сумму введенных чисел.

Задание 2. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь введет  ноль. Найдите сумму введенных чисел и определите, сколько чисел удалось ввести.

Задание 3. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл любое отрицательное число. Найдите сумму введённых чисел.

Задание 4. У Маши на столе лежат 100 фишек. Ребята в ходе игры берут нужное количество фишек. Данное количество задаётся с клавиатуры. Как только фишки у Маши закончились, игра закончилась. Сколько раз ребятам удалось взять фишки?

Задание 5. У одной из тётушек своя система подарков. В первый день рождения она дарит 5 долларов. В каждый последующий день рождения она удваивала  сумму подарка и прибавляла к нему столько долларов, сколько лет исполнилось человеку. Напишите программу, указывающую, к какому дню рождения подарок превысит 1000 долларов.

Самостоятельная работа на выбор:

1. Требуется вывести все целые степени двойки (т.е. числа вида 2k), не превосходящие числа N.
Ввод: 10        Вывод 1 2 4 8 
Ввод: 50        Вывод 1 2 4 8 16 32

2. Требуется найти наименьший натуральный делитель целого числа N, отличный от 1.
Ввод: 15     Вывод: 3
Ввод: 35     Вывод: 5