День безпечного інтернету (Safer іnternet day) прогресивне людство відзначає 6 лютого, адже дана проблема давно вже стала однією з глобальних. Цю традицію запровадили в Європі в 2004 році, бо питання інформаційної безпеки виявилися актуальними для різних країн світу. В 2008 році вже майже в 40 країнах світу, від США до Узбекистану, відзначається це нове свято. В тому, щоб зробити Інтернет чистішим і безпечнішим, без хакерів, терористів, спаму зацікавлений будь-який інтернет-користувач. Кожний шостий житель Землі регулярно працює у Всесвітній мережі, а в розвинутих країнах її колапс може призвести до колапсу цивілізації. Сьогодні електронною павутиною користується кожен п'ятий українець.В останні роки у віртуальний світ все частіше заглядають діти. Скоро всі українські школи будуть підключені до інтернету. В той же час, далеко не всі дорослі усвідомлюють потенційну загрозу спілкування підростаючого покоління з електронною машиною. Діти легко «підсаджуються на голку» інтернет-розваг, часто-густо зовсім не призначених для них. Більш того, дитина через незрілість психіки не в змозі адекватно оцінити отриману, за до Глобальної мережі, інформацію. З позицій закону багато інтернет-погроз не є протиправними, але вони явно неприпустимі з позицій моралі. Тому в даному випадку актуальною стає до самого суспільства. З проблем безпеки дітей в Інтернеті проводяться міжнародні конференції, у багатьох країнах діють «гарячі телефонні лінії», що приймають інформацію про небезпечні сайти, проводиться психолого-педагогічна оцінка змісту мережевих ресурсів.
ОТДЕЛ Задание+; ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;
ПЕР ф1, ф2: РЯД 50 ИЗ ЗНАК;
УКАЗ Вывод.Цепь("Введите первую фамилию: "); Приём.Строка(ф1); Вывод.Цепь("^Введите вторую фамилию: "); Приём.Строка(ф2); ЕСЛИ ДЛИНА(ф1) > ДЛИНА(ф2) ТО Вывод.Цепь('Фамилия "'); Вывод.Цепь(ф1); Вывод.Цепь('" имеет больше символов, чем "'); Вывод.Цепь(ф2); Вывод.Цепь('".') АЕСЛИ ДЛИНА(ф1) < ДЛИНА(ф2) ТО Вывод.Цепь('Фамилия "'); Вывод.Цепь(ф2); Вывод.Цепь('" имеет больше символов, чем "'); Вывод.Цепь(ф1); Вывод.Цепь('".') ИНАЧЕ Вывод.Цепь("Фамилии одинаковой длины.") КОН
Например 2018 год - MMXVIII если ты родился(родилась) в 21 веке вот табличка:
2017 - MMXVII, 2016-MMXVI, 2015-MMXV, 2014-MMXIV, 2013-MMXIII, 2012-MMXII, 2011-MMXI, 2010-MMX, 2009-MMIX, 2008 -MMVIII, 2007-MMVII, 2006- MMVI, 2005-MMV, 2004-MMIV, 2003-MMIII, 2002-MMII , 2001-MMI, 2000-MM.
Номер месяца пишется так же как и обычная римская цифра, от I, до XXXI.
Также пишутся месяца, от I, до XII.
Пример: я родилась V. XII. MMV (5 декабря 2005 года)