Поделитесь своими знаниями, ответьте на вопрос:
НУЖНА ПО EXCEL! ПРИКРЕПИТЕ ДОКУМЕНТ EXCEL) a) Создайте формат, выводящий положительные числа со словом «Приход», отрицательные со словом «Расход», вместо нуля – «Ничего», а в случае ввода текста – «Ошибка». Пояснения к работе: 1. Выделить ячейку 2. Контекстное меню – Формат Ячейки 3. вкладка Число, пункт (все форматы) 4. В строке тип записываем «Приход:»###р.;«Расход:»###р.;«Ничего»; «Ошибка»@ б) Создайте формат, выводящий числа от 0 до 10 синим цветом, от 10 до 20 – красным, остальные - зеленым цветом. Пояснения к работе 1. Выделить ячейку 2. Контекстное меню – Формат Ячейки 3. вкладка Число, пункт (все форматы) 4. В строке тип записываем [Синий][<10];[Красный][<20];[Зеленый]
const
n=10;
var
x:array[1..n] of integer;
i,k:integer;
begin
{ подготовка исходного массива }
Randomize;
Writeln('Исходный массив');
for i:=1 to n do
begin
x[i]:=Random(200)-100;
Write(x[i],' ')
end;
Writeln;
{ непосредственно алгоритм }
k:=0;
i:=1;
while (i<=n) and (k=0) do
if x[i]<0 then for k:=i to n-1 do x[k]:=x[k+1]
else Inc(i);
for i:=1 to n-1 do Write(x[i],' ')
end.
Контрольное решение
Исходный массив
93 59 61 -76 30 -79 52 -76 91 -82
93 59 61 30 -79 52 -76 91 -82