Var a: array [1..100] of real;
n, i, kol: integer;
begin
readln(n);
for i := 1 to n do
read(a[i]);
kol := 0;
for i := 1 to n do begin
if (a[i] > 0)and(i mod 2 = 0)
then kol := kol + 1;
if a[i] < 0
then a[i] :=0;
end;
writeln(kol);
<span>end.</span>
Это клавиши Backspace и Delete. Delete удаляет все по правую сторону от курсора, а Backspace по левую сторону.
Единичная система счисления Необходимость в записи чисел стала возникать у людей еще в древности после того, как они научились считать. Свидетельством этого являются археологические находки в местах стойбищ первобытных людей, которые относятся к периоду палеолита (10-11 тыс. лет до н.э.). Изначально количество предметов изображали, используя определенные знаки: черточки, насечки, кружочки, нанесенные на камни, дерево или глину, а также узлы на веревках. Рисунок 1. Ученые эту систему записи чисел называют единичной (унарной), поскольку число в ней образовано повторением одного знака, который символизирует единицу.
Информация взята с сайта биржи Автор24: https://spravochnick.ru/informatika/sistemy_schisleniya/nepozicionnye_sistemy_schisleniya/ .
В 1 коробке ( с ленточкой ) есть кукла , во второй нет открытки
Ответ:
1. В и С
2. игры, и второе тоже игры, если нужно что-то другое - видео монтаж
3. текстовый редактор и издательская система
4. "самописная" программа. Вряд ли что-то готовое подобрать получится
5. Excel файл во вложении. Если словами: в столбце А вводить U, в столбце B вводить R, а в столбце C написать формулу: "=A1/B1" - это для первой строки, для остальных строк скопировать эту формулу
Объяснение: