uses crt;
const n=3;
var i,s:integer;
k:string;
a:array[1..10] of integer;
begin
repeat
clrscr;
s:=0;
writeln('Задйате стаж работы в анкеты ');
for i:=1 to n do begin
write('Анкета ', i,': '); readln(a[i]);
if a[i]>=5 then inc(s)
end;
writeln('По реузльтатам подходят ', s,' анкеты');
writeln('Повторить - Enter. Выход - любой символ + Enter');
readln(k);
until k<>''
end.
Друга ищи, а найдёшь - береги.
Старый друг лучше новых двух.
B = 2; d = 17
b<=15 ⇒ 2<=15 ⇒ true (истина) ⇒ b = b+d = 2+17 = 19
d = d+1 = 17+1 = 18
b = b+d = 19+18 = 37
Ответ: b=37
Начало
Вводим a=0
далее выполняется действие:
x=a*2=0*2=0
условие:
0<10 да, далее выполняется действие:
x=x-5=0-5=-5
вывод х=-5;
конец.
Также и с остальными:
начало
ввод а=2
х=2*2=4
4<10
х=4-5=-1
вывод х=-1;
Конец.
Начало
ввод а=4
х=4*2=8
8<10
х=8-5=3
вывод х=3
конец.
Начало
ввод а=6
х=6*2=12
12>10
х=12+6=18
вывод х=18
конец.
Начало
ввод а=8
х=8*2=16
16>10
х=16+6=22
вывод х=22
Конец.
Правильный ответ 4.
Приведем все слагаемые к степени двойки. 2^4096+2^11-2^8.
2^4096 в двоичном представлении будет выглядеть как 1 и 4096 нулей. Прибавление к нему 2^11 добавит единицу в 12 разряд, если считать слева направо. Вычитание 2^8 даст 3 единицы, проэкспериментируйте 100000000000-100000000 = 11100000000. Итого 4 единицы.