Соблюдение простых правил избежать многих проблем
1. Советуйтесь с родителями.
Обязательно спрашивайте родителей о незнакомых вещах в Интернете. Например, о получении странного сообщения или предложения.
2. Храните личную информацию в тайне!
Не пишите в Интернете (в том числе в играх и на своих страничках в социальных сетях) личную информацию, такую как: домашний адрес, номера домашнего и мобильного телефонов, адрес электронной почты, место учёбы.
3. Не открывайте подозрительные файлы.
Не стоит скачивать или открывать неизвестные, а особенно присланные незнакомцами файлы. Это может привести к заражению компьютера вирусами.
4. Не переносите виртуальные знакомства в реальность.
Если виртуальный знакомый хочет пообщаться или встретиться с вами в реальной жизни – ни в коем случае не соглашайтесь. Люди в сети не всегда рассказывают правду о себе и целях своих поступков. Обязательно сообщите о таком предложении родителям.
5. Не спешите отправлять sms.
Если за скачивание картинки или музыки из Интернета, или для покупки игровых ценностей просят отправить sms, спрашивайте разрешение у родителей для отправки подобных сообщений.
6. Будьте дружелюбны.
Не нужно писать грубых слов, потому что читать их так же неприятно, как и слышать, к тому же за грубости на ваш аккаунт могут быть наложены ограничения.
7. Храните пароли в секрете.
Храните в секрете свои пароли от страничек, почты и игр от всех, кроме родителей.
var a:array[1..n] of integer;
i,s1,s2:integer;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
begin
a[i]:=random(51);
write(a[i]:4);
end;
writeln;
s1:=0; s2:=0;
for i:=1 to n do
if i mod 2 = 1 then s1:=s1+a[i] else s2:=s2+a[i];
writeln('s1 = ',s1,' s2 = ',s2);
end.
Пример:
Массив A:
21 46 43 5 40 32 26 34 29 48
s1 = 159 s2 = 165
Подробнее - на -