Называют понятной. сама делала эту работу)
//Pascal
//Массив заполняется случайными числами от 1 до 10
var
A: array [1..10] of byte;
i: byte;
Sum: real;
begin
randomize;
for i := 1 to 10 do
begin
A[i] := random(9)+1;
write(A[i]:3);
Sum := Sum + A[i] + 2;
end;
writeln;
for i := 1 to 10 do writeln(Sum/sqrt(abs(A[i])):0:2);
writeln;
end.
А) лук, выращиваемый на грядке
Вход:
Вода
Выход:
плод, корни.
Извиняюсь если ответ не правильный ( особбенно пояснение!)
1110011=1*2^6+1*2^5+1*2^4+1*2^1+1*2^0=115
564=5*8^2+6*8^1+4*8^0=372
9B=9*16^1+11*16^0=155
1101101=1*2^6+1*2^5+1*2^3+1*2^2+1*2^0=109
35=3*8^1+3*8^0=27
5D=5*16^1+13*16^0=93