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

ответ:Базовая система ввода-вывода BIOS (Basic Input Output System) называется так потому, что включает в себя обширный набор программ ввода-вывода, благодаря которым операционная система и прикладные программы могут взаимодействовать с различными устройствами как самого компьютера, так и с устройствами, подключенными к нему. Вообще говоря, в архитектуре IBM-совместимого компьютера система BIOS занимает особое место. С одной стороны, ее можно рассматривать, как составную часть аппаратных средств, с другой стороны, она является как бы одним из программных модулей операционной системы.

Заметим, что система BIOS, помимо программ взаимодействия с аппаратными средствами на физическом уровне, содержит программу тестирования при включении питание компьютера POST (Power-On-Self-Test) и программу начального загрузчика. Последняя программа необходима для загрузки операционной системы с соответствующего накопителя.

Объяснение:

Program chik;
var a:array[1..1000]of integer;
h,i,n,x:integer;
begin
read(n);
h:=0;
for i:=1 to n do
begin
read(a[i]);
end;
read(x);
for i:=1 to n do
begin
if(a[i]=x*x)then h:=h+1;
end;
write(h);
end.
2)
program chik2;
var a,h:integer;
begin
a:=5;
h:=0;
while a<>0 do
begin
read(a);
if(a<0)then h:=h+1;
end;
write(h);
end.
3)program chik3;
var a,h,s,p:real;
begin
a:=5;
h:=0;
while a<>0 do
begin
read(a);
s:=s+a;
h:=h+1;
end;
p:=s/h;
write(p);
end.
4)program chik4;
var n,j,i:longint;
begin
read(n);
for i:=1 to n do
begin
for j:=1 to i do
begin
write(j,' ');
end;
writeln;
end;
end.
 УДАЧИ!