Домашняя работа на 17-20 января.

Посмотреть видео с урока и поиграть в обучающие игры

Выучить наизусть и записать в тетрадь 

var  a, b, a1, a2: integer;
begin
  Write('введите a= ');
  Readln(a);
  a1 := a mod 10; {Выделение последней цифры}
    a2 := a div 10; {Выделение первой цифры}
  b := a1 * 10 + a2;
  Write('результат = ', b);
end.

var  a, b, c, d: integer;
begin
  read(a, b);
  c := a div b;
  d := a mod b;
  writeln('целая часть=', c);
  writeln('остаток=', d);
end.

• План урока 17-20 янв

1 написать задачу
2 тест на команду write
3 тест на команды div mod