4. В таблице используется условноеформатирование. Книга - Мери Се
Вот Inspider12
Реанирование
Pine страни
і
Перектері
Сортироксин
.
розтирот Стан
9-мод тараптарсани - а найблицу неек -
Масло
Г.
eee olmes
Igaun ESACHENER RIDGE
Р
о
R
о
С
E
5
E
Н
Права ребра тряжемсан
2
2
А
B
HONHOMME
Інсбук
2 Монитор
ЗМатеринская плата
4 Knewrypa
Saneukapta
Esero
4
3
6
7
чен
50 220 000 доороо
4 20 000
10000
7 50 000
9 2000 1800
S 1900
S00 1400
бка корм
орректни циганко става всеке
Е наборы такое
9
Бать правило,
коетоктотсуство на зачево
D D
Сумаменее працы
12
Напишите порядок действий, для создания условного форматирования.
1.
2.
3. Гистограмма.
4. Градиетная заливка.​

//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var a,n,i,s:integer;
begin
  write('Число элементов последовательности ');
  readln(n);
  for i:=1 to n do begin
    write(i,' элемент последовательности = ');readln(a);
    if (a mod 2 <>0) then s:=s+a;
  end;
  writeln('Сумма нечетных = ',s);
 end.

Тестовое решение:
Число элементов последовательности 5
1 элемент последовательности = 3
2 элемент последовательности = 2
3 элемент последовательности = 4
4 элемент последовательности = 1
5 элемент последовательности = 5
Сумма нечетных = 9

1. Если имеется в виду язык Pascal, то получим следующее:
var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
  readln(a);
  b:=a+a;
  writeln (b);
end.

Program50.pas(5) : Неизвестное имя 'b'

2. Попробуем такой вариант на Python

a =int(input())
b = a+a
print(b)

При вводе а получим на выходе 10

Получается, что в Pacal требуется объявлять переменные в секции переменных, или в любом месте программы можно объявить переменную с служебного слова var для PascalABC.net. Первый код можно переписать так, и он будет работать:

var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
  readln(a);
  var b:=a+a;
  writeln (b);
end.

Рузультат при введенном значении 5 равен 10