Переведите числа 1101, 101(2) 7132, 07(8) в десятичную систему

1101 = 24 101 = 5 7132 = 3674 07 = я что то не понял : d

Для начала заводим переменную счетчик для подсчета количества четных и нечетных .

var count,count2:integer;

Далее в теле цикла с массивом, после его вывода добавляем условие if then else

if a[i].IsEven then count+=1 else count2+=1

Т.е. сам цикл будет выглядить так

for i := 1 to n do

 begin

   a[i] := Random(1, 50);

   Write(a[i], ' ');

   if a[i].IsEven then Count += 1 else Count2 += 1;

end;

Вместо a[i].IsEven можно использовать not Odd(a[i]) или уже a[i] mod 2 = 0

Ну а далее уже вывод количеств четных и нечетных

Можно сделать все еще проще.

begin

 var a := ArrRandom(20, 1, 50);

 Println('Четных ', a.Where(z -> z mod 2 = 0).Count, 'Нечетных ', a.Where(z -> Odd(z)).Count);  

end.

На вход программе дается целое число n — количество запланированных звонков (1 ≤ n ≤ 2·105). На следующей строке вводятся через пробел n целых чисел Pi, обозначающие прибыли от звонков (0 ≤ Pi ≤ 1 000). Затем вводятся n+1 целых чисел Aj, обозначающие, сколько звонков можно будет провести после подзарядки (0 ≤ Aj ≤ 106).

Выходные данные

Выведите два числа, первое — это максимальная выгода, которую может получить бизнесмен, второе — количество пропущенных первых звонков, при котором она получается (0, если выгоднее всего не заряжать телефон вовсе).

Примеры тестов

входные данные

5

1 2 0 4 1

2 0 8 3 5 6

выходные данные

5 3

Примечание

Рассмотрим пример из условия: n = 5, P1 = 1, P2 = 2, P3 = 0, P4 = 4, P5 = 1, A0 = 2, A1 = 0, A2 = 8, A3 = 3, A4 = 5, A5 = 6.

Если бизнесмен не будет заряжать телефон, то результат будет равен P1 + P2 = 1 + 2 = 3 рубля. Если предприниматель будет заряжать телефон вместо первого звонка, то он не сможет позвонить ни разу, так как A1 = 0. Если вместо первых двух звонков, то результат составит P3 + P4 + P5 = 0 + 4 + 1 = 5 рублей. Если вместо первых трех, то P4 + P5 = 4 + 1 = 5. Если вместо четырёх звонков, то P5 = 1 рубль. Наконец, если бизнесмен будет заряжать телефон вместо всех n = 5 звонков, то он заведомо ничего не получит. Таким образом, два лучших варианта — это заряжать либо вместо 2 первых звонков, либо вместо 3, в обоих случаях получаем 5 рублей прибыли. По условию, из них мы выбираем выбираем вариант с 3 пропущенными звонками.

Объяснение: