Задачка на Pascal
Цитата:
Даны «N » натуральных чисел t1,t2,t3,...tn. Определить количество членов, которые удовлетворяют следующему условию: 2^K<ak<k+t^100
Большос спасибо всем откликнувшимся!
:)
Вообще все просто.
1. Заполняем массив
Код:
t:array[1..N] of word;
2. Где то берем k и a,
3. Проходим циклом и считаем количество элементов удовлетворяющих условию:
Код:
count:=0;
for i:=1 to N do
if {Условие пишем сами} then
inc(count);
for i:=1 to N do
if {Условие пишем сами} then
inc(count);
4. ......
5. PROFIT!