нота кодируется минимум тремя битами. значит 180 нот - 540 бит
Var
y, x : Real;
begin
WriteLn('Vvedite X'); ReadLn(x);
y:= sqrt(sqr(x)*x);
WriteLn('Otvet:', y);
ReadLn;
end.
Ответ:
слушай по информатике у меня плоховато но наверное так
Объяснение:
наверное так
Нажмите (windows+R) и ведите программу и нажмите выполнить и всё