Изменил некоторые таблицы. Данных очень мало. Придумывай и набивай еще. Надо, чтобы поездок было много, в разные месяца и года. База находится по ссылке https://yadi.sk/d/pjPhSDS1TMjF4
Так :)
program p1;
var a:integer;
begin
writeln('Введите число: ');
read(a);
writeln('число: ',a);
<span>end.</span>
uses Robot;
begin
Task('cif2');
while FreeFromRight do begin
Right;
if WallFromUp or WallFromDown then Paint;
end;
end.
<span>К вашим схемам можно подобрать такие предложения на тему "Наши школьные дела":
</span>
<span>1)
</span>Петя легко решил задачу, Миша не понял
задание.
<span>2) </span>Учитель
попросил помыть доску, Маша вызвалась помочь.
<span>3) </span>Математика
нравится Коле и Диме.
<span>4) </span>Мой
одноклассник играет в шахматы.
Сначала надо перевести все эти числа из восьмеричной системы в двоичную.
Каждая восьмеричная цифра даёт три двоичные.
Переводить можно по таблице, где проставлены восьмеричные числа от нуля до семи и соответствующие им двоичные.
После, надо все полученные двоичные числа записать одно под другим на бумаге в клеточку- чтобы каждая цифра была в отдельной клеточке.
И, закрасить клетки, в которых оказались единицы.
Должен получиться рисунок.
Я всё это сделал в таблице Excel (смотри скрин внизу), саму таблицу тоже там можно скачать.