Напишите программу для вычисления суммы положительных случайных элементов массива на промежутке [- 9:10] на Паскаль​

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

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

v=i*k (объем=глубина цвета * кол-во точек)

i=10, т.к. 1024=2¹⁰ 

k=100*(15*18)=27000 точек

v=10*27000=270000 бит = 33 килобайт (1 килобайт = 8192 бит)

с: =(a+b)*(b-a) должно быть ну и тогда с это разность квадратов а и в

ток-кот=кто это 954-459=495. бра+бар=раб это 495+459=954