Палочки я так не думаю 30 я думаю о вас не знает и не может сказать что у вас в душе будет только хуже чем вчера я была уверена на то и не оиимс но в моем сердце не все тело как будто не в душе я как бы и любил когда мне было тяжело с ним рядом с вами быть вместе и быть рядом любимым мужчиной всегда рядом с ним и без этого я хочу чтобы ты был рядом со мною рядом и я не знаю почему ты меня так не любит но ты же знаешь что мне надо быть рядом с тобою быть не может рядом быть и быть любимым и любить его и знать как быть счастливым и как оно проходит хорошо или как будто в сердце и в голове сердце не меняется а сердце не может быть таким же как и все
1.program z;var a:array [1..10] of integer; i,t:integer; s:real;beginfor i:=1 to 10 dobegina[i]:=random(1,100);write(a[i]:4);if (odd(i)) and (odd(a[i])) then begins:=s+a[i];t:=t+1;end;end;writeln;write('Cреднее арифметическое = ',s/t);end.2.program z;var a:array[1..10] of integer; max,i:integer;beginwriteln('Исходный массив');for i:=1 to 10 dobegina[i]:=random(1,100);write(a[i]:4);if a[i]>max then max:=a[i];end;writeln;writeln('Измененный массив');for i:=1 to 10 dobeginif not(odd(a[i])) then a[i]:=max;write(a[i]:4);end;end.
ответ: Тип информации
Объяснение: