Как выполнить по информатике сладкий, кислый.холодный , мокрый?

Сладкий часdashawarm  1 неделя назад  чай*dashawarm  1 неделя назад  кислый мангоdashawarm  1 неделя назад  холодный бидон с водойdashawarm  1 неделя назад  мокрый песdashawarm  1 неделя назад 

// pascalabc.net

var arr: array [1..15] of integer;

count: integer;

begin

    for var i: =1 to 15 do

        arr[i]: =random(1, 300);

   

    writeln('исходный массив: ');

    for var i: =1 to 15 do

        write(arr[i], ' ');

    writeln();

   

    count: =0;

    for var i: =1 to 15 do

        if (arr[i] > 9) and (arr[i] < 100) then

            count += 1;

    writeln('количество двузначных чисел: ', count);

end.

11010.111.11111010110

Объяснение:

26.07.2006

Переводим числа из десятичной системы счисления в двоичную:

1) 26₁₀ = n₂

26 : 2 = 13 (ост. 0)

13 : 2 = 6 (ост. 1)

6 : 2 = 3 (ост. 0)

3 : 2 = 1 (ост. 1)

1 : 2 = 0 (ост. 1)

Остаток от деления записываем в обратном порядке и получаем число: 11010₂

2) 07₁₀ = n₂

07 : 2 = 3 (ост. 1)

3 : 2 = 1 (ост. 1)

1 : 2 = 0 (ост. 1)

Остаток от деления записываем в обратном порядке и получаем число: 111₂

3) 2006₁₀ = n₂

2006 : 2 = 1003 (ост. 0)

1003 : 2 = 501 (ост. 1)

501 : 2 = 250 (ост. 1)

250 : 2 = 125 (ост. 0)

125 : 2 = 62 (ост. 1)

62 : 2 = 31 (ост. 0)

31 : 2 = 15 (ост. 1)

15 : 2 = 7 (ост. 1)

7 : 2 = 3 (ост. 1)

3 : 2 = 1 (ост. 1)

1 : 2 = 0 (ост. 1)

Остаток от деления записываем в обратном порядке и получаем число: 11111010110₂

Получаем дату: 11010.111.11111010110