Pascal
read(A) {Ввод А}
А:=А*А;
А:=А*А;
write(A) {Вывод А}
1. var z:array[1..8,1..5] of real;
2. n[i,k]:=random(90)-62;
PASCAL
program aa;
var a : integer;
begin
writeln('Введите день недели');
Read(a);
If (a < 1) or (a>7) then writeln('Такого дня не существует');
If (a > 0) and (a<6) then writeln('Рабочий день');
If a=4 then writeln(четверг');
end
361,105 (10)=3*10^2+6*10^1+1*10^0+1*10^(-1)+0*10^(-2)+5*10^(-3)
224 (16)=2*16^2+2*16^1+4*16^0
521 (8)=5*8^2+2*8^1+1*8^0
111011 (2)=1*2^5+1*2^4+1*2^3+0*2^2+1*2^1+1*2^0
V1=y*t*k*b
V1=60*22*8*1=10560 bit
V2=44*60*16*1=42240 bit
ответ в битах