Вопросы и задания
1. Приведите пример обмена информацией между людьми. Что в вашем примере является источником информации, а что - приёмником?
2. Приведите пример источника информации и расскажите о нём.
3. Чем отличается источник информации от приёмника?
4. Является ли природа источником информации для человека? Приве¬дите пример из собственной жизни.
5. Определите источник и приёмник информации, а также характер (одно¬сторонний, двусторонний) передачи информации в следующих ситуациях:
- школьник читает текст в учебнике;
- бабушка читает письмо;
- мальчик просыпается от звонка будильника;
- разговаривают подруги: Диана и Алина;
- учитель объясняет новый материал всему классу;
- регулировщик управляет потоками машин и пешеходов;
- человек читает объявление в газете;
- завуч вывешивает листочек с изменениями в расписании уроков;
- диспетчер сообщает, что автобусный рейс отменяется;
- вывешен знак, запрещающий проезд по улице.
6. Что вы знаете об электронной почте? Сравните возможности передачи информации с бумажного и электронного писем. Сравните возмож¬ности передачи информации с телефона и электронного письма.
7. Опишите следующие ситуации передачи информации на отдельной бумаге и расскажите.
a:integer;
begin
readln(a);
writeln(not odd(a));
if a mod 10 = 7 then b:=true;
writeln(b);
writeln(not odd(a mod 10));
end.
var r,a:integer;
begin
read(r,a);
if a*a>pi*r*r then writeln('Square')
else if a*a<pi*r*r then writeln('Circle')
else writeln('Equal');
end.
var m1,m2,v1,v2:integer;
begin
read(m1,v1,m2,v2);
if m1/v1>m2/v2 then writeln('p1>p2')
else if m1/m2<m2/v2 then writeln('p1<p2')
else writeln('p1=p2');
end.
var a,b:real;
begin
read(a,b);
b*=0.45;
if a>b then writeln(b)
else if a<b then writeln(a)
else writeln('Equal');
end.