Определи истинность утверждений для дерева Ы, заполни таблицу.
Все следующие вершины после зелёной квадратной бусины четвёртого уровня — синие квадратные бусины.
Все следующие вершины после красной квадратной бусины четвёртого уровня — треугольные бусины.
Все квадратные листья — синие.
Все треугольные листья — жёлтые.
Все треугольные бусины на третьем уровне — жёлтые.
Все круглые бусины пятого уровня — красные.
Предыдущая бусина перед каждой круглой жёлтой — треугольная.
Предыдущая бусина перед каждой круглой красной — круглая.

program p1; vara: string; i: integer; beginreadln(a); for i: =length(a) downto 2 dobeginif a[i]=a[i-1]then delete(a,i,1); end; writeln(a); end.

ввел: asdfsss

результат: asdfs

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

объединение северного и южного египта произошло около 3000 г. до н.э.

t1 = s1/v1

t2 = s2/v2

v(sr) = (s1+s2)/(t1+t2)

program chislo;

var x: integer;

          z,y : real;

begin

readln(x);

y: =5.5;

z: = x-y;

writeln(z);

end.

при запуске программы вводите эти значения и тестируете.