Если предположить что исход охоты это всегда 100\% одна птица
То 1 бит. Истина - гусь, ложь - утка
Еще один бит на то что хоть кого то подстрелили либо полная неудача
Истина - подстрелили ; Ложь - охотники придут с пустыми руками
И того 2 бита
Если нужно кодировать и колличесво и разных птицтогда нужно придумать правило кодирования.
[колво гусей][колво уток]
[0..100][0..500]
100 = 1100100 = 7 бит
500 = 111110100 = 9 бит
<span>И того 7+9 = 16 бит</span>
1)250 |8
31(2)|8
3(7) =372 (8)
2)5E(16)= 5*16^1+14*16^0=80+14=94
3)10011-110=1101
4)11100110
5)14(x)+42(x)=100(x)
x^1+4x^0+4x^1+2x^0=1*x^2
5x+6=x^2
x^2-5x-6=0
D=49
x=(5+7)/2=6
От 6
begin
var m := 105;
var n := 15;
Println(1 + (m mod n) * (n mod m)); //1
end.
1)
//Pascal ABC.Net
Var a:array[1..4] of longint;i,min:longint;nom:byte;
Begin
for i:=1 to 4 do
read(a[i]);
min:=a[1];
nom:=1;
for i:=2 to 4 do
if (a[i]<min) then begin min:=a[i]; nom:=i; end;
for i:=1 to 4 do
if (i<>nom) then write(a[i],' ')
else begin write(a[i]*a[i],' '); nom:=0; end;
writeln;
End.
Тесты
Входные данные: 2 3 4 5
Выходные данные: 4 3 4 5
Входные данные: 10000 10001 10002 10003Выходные данные: 100000000 10001 10002 10003
2) Зарезервированные слова - проще говоря, это слова, которые нельзя указывать как имена переменных или констант. Список всех слов в языке Паскаль:
Absolute — Абсолютный
And — Логическое И
Array — Массив
Begin — Начало блока
Const — Константа
Div — Деление нацело
Goto — Переход на
Do — Выполнять
Downto — Уменьшить до
Else — Иначе
End — Конец блока
File — Файл
For — Для
Function — Функция
If — Если
Interrupt — Прервать
Interface — Интерфейс
Label — Метка
Library — Библиотека
Mod — Остаток от деления на
Not — Логическое НЕ
Or — Логическое ИЛИ
Of — Из
Object — Объект
Procedure — Процедура
Program — Программа
Repeat — Повторять
String — Строка
Then — Тогда
To — Увеличивая
Type — Тип
Until — До
Uses — Использовать
Var — Переменная
While — Пока
With — С
Xor — Исключающее ИЛИ
И т.д.
В основном при написании они все выделяются жирным шрифтом (в Pascal)
3)
1. Имя программы
2. Раздел подключения модулей
3. Раздел описаний
Begin
4. Операторы
End.
//Работает до 7 числа
//Dev-C++ 5.11 (C)
#include <stdio.h>
#include <math.h>
int main(void)
{long long unsigned int a,b,i,d;
i=2;
d=1;
scanf("%d %d",&a,&b);
while (pow(2,i-1)*(pow(2,i)-1)<=b)
{for(int j=2;j<(pow(2,i)-1)/2;j++)
if(int(pow(2,i)-1)%j==0)d=0;
if(d)
{d=pow(2,i-1)*(pow(2,i)-1);
if(d>=a)printf("%d \n",d);}
d=1;
i++;}
return 0;}