Значение арифметического выражения: 9^8 + 3^24 - 6 записали в системе счисления с основанием 3. Сколько цифр 2 содержится в этой записи

1)

program z1;

var a: integer;

begin read(a);

if (a> 9) and (a< 100) then writeln(a, '-двузначное число')

else writeln(a, '-не является двузначным числом');

end.

2)

program z2;

var i: integer;

begin

for i: =1 to 9 do if (i mod 2 = 1) then writeln(i, ', ');

end.

2 способ:

program z2; var i: integer; begini: =1; while i< =9 do begin write(i, ', '); i: =i+2; end; end.

3)

program z3; var i,n: integer; s: real; a: array[1..100] of real; beginwrite('введите количество элементов массива: '); readln(n); write('введите элементы массива: '); for i: =1 to n do read(a[i]); i: =1; s: =0; while i< =n do begin s: =s+a[i]; i: =i+2; end; write('s=',s); end.

v=331+0.6t

в зимний день- v=331+0.6*(-35)=310 м/с

в летний день- v=331+0.6*30=349 м/с

поправьте меня если ^ это не указатель стпени, но если это степень то вот просто:

var a,x: extended; n,i: longint; begin    read(x);     read(n);     a: =1;     for i: =1 to n do        a: =a*x;     writeln(a: 0: 0); end.