Последовательные двоичные код от 00 до 11 - это 00, 01, 10 и 11.
Нужно наибольшее число подряд идущих нулей. Двух рядом стоящих одинаковых букв в последовательности нет, значит 0000 быть не может. Поэтому наибольшее количество нулей будет равно 4, в таком случае код одной буквы будет равен 10, следующей после неё - 00, следующей - 01, то есть вместе они образуют комбинацию 10 00 01
Var rost :array[1..100] of integer;
n, i, k: integer;
begin
writeln('Введите общее количество участников');
readln(n);
for i:=1 to n do
read(rost[i]);
for i:=1 to n do
if (rost[i] >=180) then Inc(k);
writeln(k);
<span>end.
Пример входных данных
3
179 180 194<span>
Выходные данные
2</span></span>
Информатика - это наука,которая изучает способы передачи,обмена,получения и хранения информации.
Задача №1.
Надо учесть, что при x = -1 будет ошибка
Задача №2.
Не разобрал условие (((
//Pascal. Task.1
var x,y:real;
begin
repeat
readln(x);
until x<>-1;
y:=sqrt(x*x*x*x/2+2*x/(x+1);
writeln(y);
end.
1) 11011-110= 110
2) 10001-1110= 10
3) 100010-100= 11010
4) 101011- 1111= 11100
5) 1001*101=101101
6) 1001*11=11011
7) 1001+11=1100
8) 110+110=1100
9) 1100111+10011=1111010
10) 111000-11101=11011
11) 10011-10010=1
12) 110101*11101=10011011001
13) 1110101*11101=11010100001
14) 11100010-1110001=1110001
