Решить вычислите: (1v0)^(0^a)v(1v0)

койка, стройка, трест, рой, репа, тройка, река, серп,строка.

крестьянин   должен   переправить   волка   и   капусту с   собой.а   козу   надо   кинуть

  на   другой   берег.      

1)никакие художники не могут повторить замечательный стиль рисования известного художник маковского

2)все великие писатели в своё время переносили критику,но это делало их только сильнее.

дальше не придумал

(с уважением tipaeinstein) 

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;