пятница, 20 декабря 2024 г.

Мультимедиа на веб-страницах. Урок 2

   

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

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

Задание 1. 
1. Загрузите Notepad+++.


2. Сохраните документ с именем priroda. Тип файла html

ФАЙЛЫ ДЛЯ РАБОТЫ


Задание 2. 

1. Выберите Синтаксисы/H/HTML


2.  Создайте код





3.  Сохраните изменения в файле Файл/Сохранить.

4. Откройте страницу через бразуер. Для этого зайдите в свою папку и откройте файл двойным щелчком. У вас получится примерно такой вид.



Задание 3. 

1. Добавьте через код видео леса на страницу. Как добавлять видео через код описано на стр. 68.

четверг, 19 декабря 2024 г.

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

 

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

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

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

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

Задание 3. Увеличьте в раза два размер окружностей и сделайте так, чтобы они не сливались.

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

Подсказки:
1. Какая процедура позволяет рисовать прямоугольник? Стр. 159. 
2. Вторую вершину прямоугольника можно получить из первой, добавив какое-то число. Например, rec...(x,y,x+...,y+...);
3. Вам надо рассчитать или подобрать расстояние между прямоугольниками. За это отвечают команды х:=х+...; у:=у+...;






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



среда, 18 декабря 2024 г.

Язык программирования Паскаль: структура программы, команда вывода данных

 


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


СОСТАВЛЯЕМ ПРОГРАММЫ

Задание 1. Запускаем программу PascalABC.NET. Ярлык вы найдёте на Рабочем столе или в меню Пуск Обратите внимание на чёрные буквы net в правом нижнем углу значка.

Задание 2.  

а) Выполните программу

begin
  write('Вечор, ты помнишь, вьюга злилась,');
  write('На мутном небе мгла носилась;');
  write('Луна, как бледное пятно,');
  write('Сквозь тучи мрачные желтела,');
  write('И ты печальная сидела —');
  write('А нынче… погляди в окно:');
  write('Под голубыми небесами');
  write('Великолепными коврами,');
  write('Блестя на солнце, снег лежит;');
end.

б) Замените все команды write на writeln. Выполните программу. Что произошло? Почему?


Покажите результат выполнения учителю.


Задание 3. 

а) Выполните программу. Что вывелось в результате выполнения программы?

begin
  write('5*5+7=');
end.
 
б) Замените команду  write('5*5+7='); на  write('5*5+7=' , 5*5+7); Выполните программу. Что вывелось в результате выполнения программы? Какой вывод вы можете сделать? Мы можем соединять в одной команде  текст и выражения?

в) Выполните упр. 5 п. 1 параграф 14. 

Покажите результат выполнения учителю.


Задание 4.  Выполните упр. 5 п. 3.  Обратите внимание на порядок действий
Покажите результат выполнения учителю.


Задание 5.  Составьте программу для вывода следующего рисунка
   *
 ***
*****

пятница, 13 декабря 2024 г.

Мультимедиа на веб-страницах

  

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

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

Задание 1. 
1. Загрузите Notepad+++.


2. Сохраните документ с именем kobriniz. Тип файла html


Задание 2. 

1. Выберите Синтаксисы/H/HTML


2.  Создайте код








3.  Сохраните изменения в файле Файл/Сохранить.

4. Откройте страницу через браузер. Для этого зайдите в свою папку и откройте файл двойным щелчком. У вас получится примерно такой вид.  Фото Кобрина сверху найдите больших размеров.

Задание 3. 

1. Добавьте на страницу изображение музея Суворова. 
2. Добавьте на страницу изображение парка.
3.  Добавьте на страницу изображение Загса.

четверг, 12 декабря 2024 г.

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

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

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

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



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

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

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

  1. Какая команда позволяет рисовать круги? Стр. 159
  2. Что нам надо знать, чтобы нарисовать круг?
  3. Что у нас будет оставаться постоянным? Центр круга может совпадать с центром экрана.
  4. Что будет изменяться? 
  5. Начать рисовать лучше с большего круга, иначе большие  круги  будут перекрывать большие.
...
r:=...{максимальный радиус}

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

                    end;



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


среда, 11 декабря 2024 г.

Алгоритмическая конструкция «ветвление»

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


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


Задача.  Через клетку от Робота могут быть стены. Робот делает шаг в одном из направлений. Если слева, справа, сверху или снизу  есть стена, он закрашивает клетку, в которой стоит. Обстановка if2.


ЗАКРЕПЛЕНИЕ МАТЕРИАЛА

Задание 1. Запускаем программу PascalABC.NET. Ярлык вы найдёте на Рабочем столе или в меню Пуск Обратите внимание на чёрные буквы net в правом нижнем углу значка

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

Задание 3-4. Рассмотреть оставшиеся 2 случая для предыдущей задачи


Задание 5. Задание из задачника if3. Есть поле 2х2. Робот в одном из углов. Надо перейти в противоположный угол и закрасить клетку.



if ... and ... {определяем угол}
                      then 
                      begin
                        гоним Робота в противоположный угол
                     end;
if ... and ... {определяем угол}
                      then 
                      begin
                        гоним Робота в противоположный угол
                     end;
if ... and ... {определяем угол}
                      then 
                      begin
                        гоним Робота в противоположный угол
                     end;
if ... and ... {определяем угол}
                      then 
                      begin
                        гоним Робота в противоположный угол
                     end;

пятница, 6 декабря 2024 г.

Понятие о каскадных таблицах стилей. Урок 2

 

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

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

Задание 1. 
1. Загрузите Notepad+++.


2. Сохраните документ с именем sayt. Тип файла html



Задание 2. 

1. Выберите Синтаксисы/H/HTML


2.  Создайте код



3.  Сохраните изменения в файле Файл/Сохранить.

4. Откройте страницу через браузер. Для этого зайдите в свою папку и откройте файл двойным щелчком. У вас получится примерно такой вид.



Задание 3. 

1. Заполните страницу своим содержимым: о чём будет ваш сайт. Достаточно двух предложений, но своих.

2.  Сохраните изменения в файле и откройте страницу через браузер.

четверг, 5 декабря 2024 г.

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

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

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

>

<

=

<>

>=

<=



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

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

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


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


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


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

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

VAR X,S:INTEGER;
BEGIN
 WRITELN('ВВОДИТЕ ЧИСЛА. ПОСЛЕ ЧИСЛА НАЖИМАЙТЕ КЛАВИШУ ENTER.ВВОД ЗАКОНЧИТСЯ ПОСЛЕ ТОГО, КАК ВЫ ВВЕДЁТЕ 0');


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

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

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

Подсказка.  Как изменяется количество чисел при каждом введённом числе?




среда, 4 декабря 2024 г.

Использование условий. Цикл с предусловием

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



ЗАКРЕПЛЕНИЕ МАТЕРИАЛА


Задание 1. Запускаем программу PascalABC.NET. Ярлык вы найдёте на Рабочем столе или в меню Пуск Обратите внимание на чёрные буквы net в правом нижнем углу значка

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

Задание 3. Упр. 4а стр. 74 до конца

Задание 4. Упр. 4в стр. 74 
Задание 5. Упр. 4б стр. 74 

вторник, 3 декабря 2024 г.

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

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

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

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