A := 10; b := 20; c := 30; x := b; if a>b then x := a; if c>x then x := c; writeln (x)

2^i = 24

i = 5

ответ. 5 лампочек.

составим уравнение:

x- первая корзина

y- вторая корзина

x+54=x+y

x-x+54=y

y=54 - (во второй корзине)

x=54+38

x=92

z- третья корзина

z=x-27

z=92-27

z=65

ответ: в третей корзине 65 орехов

var

n: integer;

begin

readln(n);

if (n mod 10)=(n div 100) then

writeln('палиндром')

else

writeln('не палиндром');

end.

ткань,глина,дерево,стекло,бумага,мктал,пласмасса,резина,лед