Может это?
Трубкозу́б, или африканский (капский) трубкозуб[1] (лат. Orycteropus afer) —млекопитающее, единственный современный представитель отряда трубкозубых (Tubulidentata).
Сообщение по информатике на тему : «Т9-помощник или враг»
<span> Соловьева Олеся</span>
Вот все говорят: «У меня Т9, Т9… ». А если разобраться по большому счету… Что это такое? Это предугадывающая система набора текстов для мобильных телефонов, которую придумала и разработала компания Тэгик Коммуникэйшен. В принципе, в плане изобретения, они, конечно же, молодцы! Это ноу-хау позволяет набирать наиболее часто употребляемые слова с удвоенной скоростью. Но в итоге, получается не совсем хороший результат. Если не перепроверить и не исправить допустимый вариант, можно отправить «Бамбардию киргуду». Текст может потерять значение или вообще приобрести комичный характер. В «одноклассниках» и в «контакте» такие случаи люди выкладывают как анекдоты. Вот, например:
-Ну что решили? Будете у нас размещаться?
Т9: Пока ничего. Я жру руководителя направления.
-Приятного аппетита, конечно, но кто теперь будет решать вопрос о размещении?
ИЛИ:
-Ты знаешь дорогой, я здесь за месяц похудела на три килограмма…
Т9: Ах, ты моё слонышко!
-Вот только не надо врать, что это опечатка!!!
Таких приколов в интернете множество, можно смеяться целый день. Но суть Т9 понятна. Каждый для себя сам решает пользоваться этой функцией в телефоне или отключить ее. Я лично не хотела бы, чтобы мои сообщения перевирались, а над чужими приколами, почему бы и не посмеяться!!!
В 1988 году была отмечена эпидемия компьютерного вируса<span> Jerusalem, который был запрограммирован на особенно разрушительные действия, если активировался в пятницу 13-го. В первый раз это произошло в пятницу </span>13 мая 1988 года<span>. Этот </span>чёрный юмор<span> был перенят авторами некоторых других компьютерных вирусов.</span>
Var
S, a, h: real;
begin
write('Введите длину основания --->');read(a);
write('Введите высоту --->');read(h);
S := (a * h) / 2;
writeln('Площадь треугольника равна', ' ', S);
writeln('Целая часть - ', Trunc(S));
writeln('Дробная часть - ', Frac(S));
end.
