При переводе числа 10101011 из 2-ной в 10-ую:
171
Var x,y:real;
begin
write('x = ');
readln(x);
if (x<-4)or(x>4)
then writeln('Функция не определена')
else begin
if x<0
then y:=0
else if x<2 then y:=x*x
else y:=4;
writeln('Y = ',y);
end;
end.
Пример:
x = 1.5
Y = 2.25
6 пакетов на одну чашу, 6 на другую, пакеты, вес которых меньше, делим по 3 шт., снова взвешиваем, берем любые 2 из тех, вес которых меньше, взвешиваем. Если вес одного из них меньше, то это он и есть. Если вес одинаковый, то с меньшим весом пакет, который не на весах.
Что надо делать там вапросы ???
Ну вообще объектом изучения в информатике является-информационные процессы,на этого тут нет. Из этого следует,что правильный ответ информация