1. Дана программа на языке Паскаль:
program a3;
var x, y, z: real;
begin
writeln ('BBEAVTE Tpu Yncha');
readln (x, y, z);
if (x<=y) and (y<=z)
then
begin
x:=2*x;
y:=2*y;
z:=2*z
end
else
begin
x:=abs(x);
y:=abs(y);
z:=abs(z)
end
VERTITYTTY
non

Составить блок-схему.
Решите зарание

Для удобства вычислений переведём размер сканируемого изображения в дюймы: 20,32 × 20,32 (см) = 8 × 8 (inch).

Сначала найдём количество пикселей по горизонтали, по вертикали, затем общее количество пикселей, исходя из разрешающей сканера. Зная, что каждый пиксель кодируется 4 битами, найдём объём памяти, необходимый  для хранения графической информации, что и будет являться информационным объёмом файла.

1)    600 × 8 = 4800 (px) – количество пикселей по горизонтали.

2)    1200 × 8 = 9600 (px) – количество пикселей по вертикали.

3)    4800 × 9600 = 46 080 000 (px) – всего пикселей.

4)    46 080 000 × 4 = 184 320 000 (bit) = 22 500 (KB)

ответ: полученный графический файл будет иметь объём 22 500 килобайт.

57 в восьмеричной системе - это в нашей 10-ричной 47.
2014 в шестнадцатеричной - это в нашей 8212.
Составить алгоритм по нахождению последней цифры при возведении а в степень b не сложно:
var
i,a,b,p:word; {диапазон целых чисел 0..65535}
Begin
readln(a,b);p:=a mod 10;       {первая степень числа а}
for i:=2 to b do {если степень больше 1, то в цикле начинаем домножать, пока № витка цикла не дойдет до b }
begin
p:=p*a;  {домножаем результат на последнюю цифру числа а}
p:=p mod 10; {отделяем последнюю цифру результата}
end;
writeln(p);     {по окончании цикла в р находится результат задачи}
end.
В результате вводимых данных (47 и 8212) получаем 1. Думаю, что и в 16-ричной будет тоже 1.