1. первая правая цифра числа показывает число единиц, вторая - число двоек (1·2) , третья - число четверок (2·2), четвертая - число восьмерок (4·2) и т.д. имеем:
2. число нужно поделить на два, найти остаток. полученный результат снова поделить на два и найти остаток и т.д. остатки, записанные в обратном порядке и есть запись в двоичном исчислении.
65÷2 = 32 (ост.1)
32÷2 = 16 (ост.0)
16÷2 = 8 (ост.0)
8÷2 = 4 (ост.0)
4÷2 = 2 (ост.0)
2÷2 = 1 (ост.0)
1÷2 = 0 (ост.1)
65₁₀ = 1000001₂
Ответ дал: Гость
var
i: integer;
s: real;
m: array[1..2,1..6] of real;
begin
s: =0;
for i: =1 to 6 do
begin
readln(m[1,i]);
readln(m[2,i]);
s: =s+3.14*m[1,i]*m[1,i]*m[2,i]*1200;
end;
writeln(s);
end.
Ответ дал: Гость
мало данных для главное - размер пробоины и размер листа
Популярные вопросы