четверг, 24 декабря 2020 г.

Урок 2. Ввод данных и переменные

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

var d,s : real;{описание 2-х переменных вещественного типа}
begin
  writeln('Введите длину и ширину прямоугольника');{выводит надпись Введите...}
  readln(d,s);{ждёт пока вы введёте 2 числа, числа вводятся через Enter}
  write('Площадь прямоугольника равна ' , d*s);{выводит надпись Площадь... и результат}
end.

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

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


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

четверг, 10 декабря 2020 г.

Урок 8. Использование алгоритмических конструкций при составлении алгоритмов для исполнителя Робот

 Задание. Задание cif1. Положение стен и длина коридора могут быть различными.

uses robot;

begin

 task('cif1');

 while freefromright do {пока справа свободно делаем}

                    begin

                     right; {вправо}

                     if wallfromup then paint;{если сверху стена, закрашиваем}

                    end;

 end.  

ТЕСТ


ЗАДАНИЯ

Задание 1. Запустите  программу PascalABC.NET. 

Задание 2. Выполните программу. Установите  размер поля 11х11. Выполните программу и покажите учителю.

uses robot;
procedure row;
begin
  while freefromright  do
  begin 
      paint;
      right;
  end;
 while freefromleft do left;
end;

begin
  field(7,7);
  {перемещение Робота из центра поля в левый верхний угол}
  while freefromleft do left;
  while freefromup do up;
  {выполнение процедуры в цикле до тех пор, пока снизу свободно}
  while freefromdown do begin row; down; end;
  {закрашивание последнего ряда}
  while freefromright do begin paint; right; end;
  paint;
end.



Задание 3. Составьте программу, позволяющую закрасить верхний ряд клеток. Поле Робота размером 9х1.

Нечётные номера компьютеров + 1 компьютер - 





Чётные номера компьютеров -



Задание 4. 

Нечётные номера компьютеров + 1 компьютер. Задание cif3. Закрасить клетки, у которых сверху и снизу есть стена. Положение стен и длина коридора могут быть различными.

Чётные номера компьютеров. Задание cif4. Закрасить клетки, у которых стена только сверху, а снизу стены нет. Положение стен и длина коридора могут быть различными.
 
Задание 5. Составить программу, позволяющую закрасить поле Робота  размером 9х9 с использованием процедуры  или циклов. Ваше решение должно быть  рационально.

Нечётные номера компьютеров + 1 компьютер - 





Чётные номера компьютеров -

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

параграф  14 п. 1 прочитать и составить 5 вопросов на Верю-не верю по данной теме

четверг, 3 декабря 2020 г.

Урок 7. Алгоритмическая конструкция ветвление

 



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

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

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

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





Задание 5. Задание из задачника if3. 


if ... and ... {определяем угол}then 
                  begin
                   гоним Робота в противоположный угол
                  end
                   else {иначе}
                     if .....{рассматриваем ситуацию, когда Робот в другом углу}
                     ...
                 

ДОМАШНЕЕ ЗАДАНИЕ
параграф 12, повторяем параграфы 9-11
*Составляем 5 вопросов со словами Назови, Почему, Объясни,  Предложи, Придумай, Поделись. Выбираем из списка 5 слов. И составляем 5 вопросов по темам параграфов 9-11.