В наш век компьютер стал другом каждого человека. В школах и в детских садах ребята занимаются в компьютерных классах. Сегодня компьютерная техника необходима для работы на производстве, в офисах и на транспорте. Но очень часто каждый из вас сидит дома за этой увлекательной вещицей и смотрит мультяшки, играет в игры, а иногда просто выходит в интернет. Хочу вас предостеречь, что общение с компьютером порой оказывает неблагоприятное воздействие на ваше здоровье.
При занятиях с компьютером важно помнить об опасностях, которые вас подстерегают:
• если вы близко сидите у компьютера, то идет сильная нагрузка на глаза от монитора и может ухудшиться зрение;
• если вы долго сидите у компьютера, то возникает нагрузка на позвоночник;
• повышенный уровень шума при работе компьютера и принтера создает нагрузку на мозг;
• электромагнитное излучение от монитора может также привести к заболеваниям;
• пыль, возникающая при работе с компьютером, приводит к снижению иммунитета;
• компьютер работает под высоким напряжением, а при неисправной проводке может возникнуть возгорание монитора и поражение пользователя электротоком;
• а если вы играете длительное время в игры, то страдает ваше эмоциональное состояние.
Учитывая эти опасности, следует знать правила работы с компьютером:
• Правильно установите компьютер: задняя часть монитора не должна быть направлена на людей и место их отдыха; диваны и кровати должны находиться на расстоянии не менее 2,5 - 3 метров от компьютера; на экране должен быть защитный фильтр.
• Компьютер необходимо подключить через заземленную розетку и пилот.
• Обязательно в помещении должен быть включен свет и должна гореть настольная лампа.
• При работе с компьютером надо соблюдать правильную осанку.
• Расстояние от глаз монитора должно быть не менее полметра.
• Не стоит общаться с компьютером людям с аллергией и сердечными заболеваниями.
• Дети могут работать с компьютером не более 1 часа в день, делая перерывы каждые 10 минут. Усаживаться за просмотр телепередач после компьютерных занятий в течение 2- 3 часов не рекомендуется, лучше отправьтесь на прогулку.
• Помощником при работе с компьютером станут физические упражнения.
• После работы с компьютером необходимо включать ионизаторы воздуха.
• Компьютер никогда не заменит прогулок на воздухе, занятий спортом и игр со сверстниками
const
handsfree = false;
nmax = 31;
random_min = -20;
random_max = 30;
var
a: array[1..nmax] of real;
i, n, j: integer;
k: integer;
begin
{ввод массива}
if handsfree then
n := random(nmax - 5) + 5
else begin
write('n = ');
readln(n);
end;
writeln('Данные массива:');
for i := 1 to n do
begin
if handsfree then begin
a[i] := random(random_max - random_min) + random_min;
write(a[i], ' ');
end
else
readln(a[i]);
end;
writeln();
{подсчет элементов}
k := 0;
for i := 1 to n do
if a[i] = 15 then
k := k + 1;
writeln('quantity = ', k);
end.
1) Номера букв
с начала алфавита - 16,5,20,25,17
с конца алфавита - 18,29,14,9, 17
Сумма номеров для каждой буквы 34.
в - 3+31, ц -24+10. И это для любой буквы
2) игра в города
Волгодонск, Калуга
<em>// PascalABC.NET 3.2, сборка 1367 от 20.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a,b:integer;
Write('Введите a и b: '); Read(a,b);
Writeln('П=',Range(a,b).Aggregate(BigInteger(1),(m,n)->m*n))
end.
<u>Пример</u>
Введите a и b: 13 57
П=84607064997021339293398188869165201400121387478093188300800000000000
1)123_8= 83_10
FF_16= 255_10
11100111_2= 231_10
2)83+255-231=107
3)107_10=1101011_2