Дано трехзначное число. определить, какая из его цифр больше: а) первая или последняя; б) первая или вторая; в) вторая или последняя. решить на visual studio

Program digit; var a, a1, a2, a3: integer; label start; begin start: writeln('введите трехзначное число'); readln(a); if (a < 100) or (a > 999) then begin writeln('вы ввели не трехзначное число'); goto start; end; a1 : = a div 100; a2 : = (a - a1 * 100) div 10; a3 : = a - a1 * 100 - a2 * 10; if a1 > a3 thenwriteln('первая цифра больше последней') else writeln('последняя цифра больше первой'); if a1 > a2 then writeln('первая цифра больше второй') else writeln('вторая цифра больше первой'); if a2 > a3 then writeln('вторая цифра больше последней') else writeln('последняя цифра больше второй'); readln; end.

посадка дерева: 1.купить семя.

2.найти место для посадки.3.вскопать яму.4.посадить семя.5.закопать яму.переход улицы по светофору: 1.подойти к дороге (к светофору)2.посмотреть на цвет, который сейчас горит.3.дождаться нужного цвета.4.перейти дорогу.5.отправиться дальше.

фомат gif

в начале идет табличка соответствия цветов под номерами

потом каждый пиксель помечается номером цвета.