Составь список свойства, которые есть у всех объектов"каштан, рябина, осина, дуб, акация, клен

Влистьях осины содержатся углеводы, органические кислоты, каротиноиды, витамин c, каротин, флавоноиды, фенолгликозиды, антоцианы и дубильные вещества. в листьях дуба - дубильные вещества и красители, пентозаны. в каштане содержатся дубильные вещества,немалое количество кверцитрина и изокверцитрина. в листья клена - дубильные вещества,есть каротин,алкалоиды,аскорбиновая кислота.

1. begin   writeln('! ');   writeln('меня зовут саша! ');   writeln('я студентка 2-ого курса начального образования! ');   writeln('я будущий учитель младших '); end. 2. var n: integer; begin   read(n);   writeln('квадрат =',n*n); end. 3. var a: integer; begin   read(a);   writeln('s = ',a*a);   writeln('p = ',4*a); end. 4. var n: integer;     begin         read(n);         writeln(n+10);   end. 5. var a,b: integer;     begin         read(a,b);         writeln(' s = ',a*b);         writeln(' p = ',2*(a+b));     end. 6. var a,b,c: integer;     begin         read(a,b,c);         writeln('сума = ',a+b+c);     end.

Const   csize = 10; var   m: array[1..csize] of integer; begin   randomize();   var max : = -(maxint);   write('исходный массив: ');   for var i : = 1 to csize do   begin       m[i] : = random(100) + 1;       if (i mod 2 = 0) and (m[i] > max) then max : = m[i];       write(m[i], ' ')   end;   write(newline, 'преобразованный массив: ');   for var i : = 1 to csize do   begin       if m[i] mod 3 = 0 then m[i] : = max;       write(m[i], ' ')   end end.