1.
Var a,b,c : Integer;
Begin
Readln(a,b,c);
Writeln((a mod b)*(c div b));
end.
2.
Var a,d,c,k : Integer;
Begin
Readln(a,d,c,k);
Writeln((a+(d-12)*3)*(c-5*k));
end.
A=4
D=C=3
C=B=9
B=A=4
Ответ: 4 4 9 3
А) 101 0100 1010(2)=2^10+2^8+2^6=1024+256+64=1354
б) BABA(16)=11*16^3+10^16^2+11*16+10=47802
в) 110 00110110(2)=2^10+2^9+2^5+2^4+2^2+2=1024+512+32+16+4+2=1590
г) CACA(16)=12*16^3+10*16^2+12*16+10=51914
Алгоритм работает, если верхние края стен расположены на одном уровне:
использовать Робот
алг
нач
нц пока справа стена
закрасить
вверх
кц
нц пока справа свободно
вправо
кц
вниз
нц пока слева свободно
влево
кц
нц пока слева стена
закрасить
вниз
кц
кон