6. Отметьте все формулы, которые НЕ изменятся при копировании из ячейки C6 в ячейку C8.
=$A5+B$2
=$A$5+$B$2
=$A$5+B$2
=A$5+B$2
=A$5+$B2
7 Отметьте все формулы, которые НЕ изменятся при копировании из ячейки C6 в ячейку D6.
=$A5+$B2
=$A$5+$B$2
=$A$5+$B2
=A$5+B$2
=A$5+$B2
8. Отметьте все формулы, которые НЕ изменятся при копировании из ячейки C6 в ячейку D8.
=$A5+$B2
=$A$5+$B$2
=$A$5+$B2
=A$5+B$2
=A$5+$B2

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

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

program gh;

    var a: array[ 1..10] of integer;

                i: integer;

begin

  for i: =1 to 10 do

        begin

              a[i] : = random(20) + 20;

              write(a[i]);

        end;

end.

двоичная (10000), восьмеричная (20), шестнадцатеричная (10)

на паскале:

var

n,s,p: integer;

begin

read(n);

p: =n mod 10;

if p mod 2=0 then writeln ('оканчивается на четную цифру')

                    else writeln ('оканчивается на четную цифру');

while n> 0 do

begin

n: =n div 10;

s: =s+1;

end;

writeln ('количество цифр в числе', s);

end.