Запишите в десятичной системе счисления числа a^3=121 ​

1 -6 февраля. / понедельник.

2 - иа.

3 - число "1"

4 - печка.

5 - клюв.

6 - царь.

7 - марка.

8 - 10 гласных,21 согласная буква.(всего 33 буквы). - твёрдый,мягкий знак - не согласная не гласная.

var

a: array[1..100] of integer;

i,s,r: integer;  

begin

for i: =1 to 100 do read(a[i]);

for i: =1 to 100 do

begin

if a[i]< 0 then r: =r+a[i] else s: =s+a[i];

end;

writeln('сумма всех положительных чисел= ',s);

writeln('сумма всех отрицательных чисел= ',r);

readln

end.

посчитает максимум 100 чисел. 

var h,a: integer;

begin

  a: =1;

  repeat

      h: = h+3;

      a: =2*a;

      writeln('прошло часов - ',h,', амеб - ',a)

  until h> =30;

  readln;

end.

var    a,b,c,d,x1,x2: real;     beginreadln(a,b,c); d: =b*b-4*a*c; if d< 0  then writeln('только комплексные корни')else

begin

d: =sqrt(d);

x1: =(-b+d)/(2*a); x2: =(-b-d)/(2*a); writeln('x1=',x1); writeln('x2=',x2); end;     end.