С объяснением! В одной из кодировок Unicode каждый символ кодируется 16 битами. Вова написал текст (в нём нет лишних пробелов): «Медведь, тигр, слон, варан, тюлень, носорог, крокодил, аллигатор – дикие животные». Затем он вычеркнул из списка название одного из животных. Заодно он вычеркнул ставшие лишними запятые и пробелы – два пробела не должны идти подряд. При этом размер нового предложения в данной кодировке оказался на 14 байт меньше, чем размер исходного предложения. Напишите в ответе вычеркнутое название животного.

№1

ответ: WinRar.

Пояснение: WinRar - архиватор, поддерживающий большое количество расширений архивов.

№2

ответ: Internet Explorer, MS Excel*, MS PowerPoint*.

Пояснение:

Internet Explorer - браузер от Microsoft, установленный на устройствах с Windows по умолчанию. Является системным.MS Excel (Microsoft Office Excel) - программа для работы с электронными таблицами. Входит в набор приложений Microsoft Office.MS PowerPoint (Microsoft PowerPoint) - программа для работы с презентациями. Входит в набор приложений Microsoft Office.WinZip - архиватор (если честно, про него не слышал). Не входит в набор системных программ Windows.C++ - это даже не программа, а язык программирования. Не подходит.Inkscape - редактор векторной графики. Не входит в набор системных программ Windows.

* Вообще, я не уверен насчёт того, что они прям входят в набор системных программ, так как MS Office не всегда предоставляется вместе с Windows. Но, поскольку тут нужно несколько вариантов ответа, то, думаю, это подходит больше всего.

1)

Объяснение:

Var

a,b,c: integer;

Begin

Writeln('ВВЕДИТЕ ЧИСЛО a ');

Readln(a);

Writeln('ВВЕДИТЕ ЧИСЛО b ');

Readln(b);

Writeln('ВВЕДИТЕ ЧИСЛО c');

Readln(c);

If ((a<b)AND(a<c)) then

Writeln( ' Наименьшее число a = ' , a);

If ((b<a)AND(b<c)) then

Writeln( ' Наименьшее число b = ' , b);

If ((c<a)AND(c<b)) then

Writeln( ' Наименьшее число c = ' , c);

end.

2)

Var

a,b: integer;

Begin

Writeln('ВВЕДИТЕ ЧИСЛО a');

Readln(a);

Writeln('ВВЕДИТЕ ЧИСЛО b');

Readln(b);

If ((a mod 2 = 0 )AND(b mod 2 = 0)) then

Writeln('СУММА ЧЕТНЫХ ЧИСЕЛ = ' , a+b)

Else

Writeln( 'Два числа не являются четными ' );

end.