2 Вещество - это то, из чего состоит физическое тело, то есть окружающие предметы.
3 Дома,на работе ( в школе ) , на улице , те же фонари , машины , вывески магазина.
4 Информационный процесс — процесс получения, создания, сбора, обработки, накопления, хранения, поиска, распространения и использования информации
5 Хранение информации, передача информации, обработка информации
6 Имея органы чувств, животные и растения воспринимают информацию. Например, цветы, получив информацию о наступлении темноты, закрывают свои бутоны. А животные по звуку могут определить приближение опасности. Информационные сигналы могут быть различной природы. Это могут быть звуки, свет, запахи, температура и химический состав среды, вспышки света. Растения и животные не могли бы нормально функционировать, если бы не получали и не использовали информацию об окружающей среде.
7 Решение задачи, перевод текста.
Первая программа.
Program d_and_e;
Var
a,b,sum_d,sum_e:integer;
Begin
WriteLn('введите первое число: ');
ReadLn(a);
WriteLn('введите второеое число: ');
ReadLn(b);
sum_d:=(a div 10) + (b div 10);
sum_e:=(a mod 10) + (b mod 10);
WriteLn('сумма десятков чисел: ', sum_d);
WriteLn('сумма единиц чисел: ', sum_e);
end.
Вторая программа.
Program d_and_e;
Var
a,b,mult_d1_e2,mult_e1_d2:integer;
Begin
WriteLn('введите первое число: ');
ReadLn(a);
WriteLn('введите второе число: ');
ReadLn(b);
mult_d1_e2:=(a div 10) * (b mod 10);
mult_e1_d2:=(a mod 10) * (b div 10);
WriteLn('произведение десятков 1-го и единиц 2-го числа: ', mult_d1_e2);
WriteLn('произведение единиц 1-го и десятков 2-го числа: ', mult_e1_d2);
end.
Третья программа.
Program d_and_e;
Var
a,b,mult_d1_e2,sum_e1_d2:integer;
Begin
WriteLn('введите первое число: ');
ReadLn(a);
WriteLn('введите второе число: ');
ReadLn(b);
mult_d1_e2:=(a div 10) * (b mod 10);
sum_e1_d2:=(a mod 10) + (b div 10);
WriteLn('произведение десятков 1-го и единиц 2-го числа: ', mult_d1_e2);
WriteLn('сумма единиц 1-го и десятков 2-го числа: ', sum_e1_d2);
end.
Переводим 112 и 64 в 2СС .
112 =<span>1110000
64 =1000000
так как байт - это 8 бит ,следовательно в числе должно быть восемь знаков , тогда добавляем перед числами по незначащему нулю , тогда
112 = 01110000
64 = 01000000
адрес сети получается , когда мы применяем поразрядную конъюнкцию (между маской и ip адресом)
01110000
хххххххх <-- маска
-------------
01000000
мы видим в адресе сети единицу и над ней в ip адресе тоже единица , значит на этом месте в маске может быть только 1 .
Так как в маске у нас идут (СТРОГО) сначала единицы ,потом нули, тогда маска будет равна 11000000 , что в переводе в 10 -ную СС =</span><span>192
Ответ : 192</span>
Var s:string; k:integer;
begin
writeln('Введите строку:');
readln(s);
s:=s+' ';
while pos(' ',s)<>0 do
begin
k:=k+1;
delete(s,1,pos(' ',s));
end;
writeln('k=',k);
end.
Пример:
Введите строку:
Подсчитать количество слов в строке
k=5