For I in massiv do
Begin
If I mod 2 =0
Then
Write(i,' ') ;
End;
1. ДЕЗИНФОРМАЦИЯ — сообщение заведомо ошибочных, искаженных, ложных <span>сведений с целью ввести информируемое лицо в заблуждение ( определение из словаря).</span> Здесь главное - цель: ввести в заблуждение. Предоставление недостаточной информации может быть и ненамеренным, например, по забывчивости или из-за незнания полного объема необходимых сведений. Например, просьба написать программу для решения какой-то задачи без указания языка программирования - это случай предоставления неполной информации, но никак не дезинформация.
2. Избыточная информация содержит сведения, не нужные для решения вопроса. Дублирующая - полностью повторяет ранее сообщенное. Например, в задаче нахождения площади поверхности шара кроме формулы для нахождения площади поверхности, сообщается формула для нахождения объема шара - это и есть пример избыточной информации.
3. Достоверность информации - это её способность сообщать истинное положение дел. Точность - степень близости информации к истинному положению дел. Например, если на улице идет сильный дождь, информация о том, что идет дождь, достоверна, а информация о том, что этот дождь сильный - точна.
В экономике сообщение о том, что инфляция за прошедший год возросла - достоверное, а о том, что она возросла на 3.7% (например) - точна.
А) книга, Сказки Пушкина,235 страниц, содержит текст и цветные иллюстрации,стоимость 75 рублей.
б) 1 Сказки Пушкина
2 235 страниц
3 75 рублей
4 цветные
<span>5 есть текст
вроде так)))</span>
Var A : Integer;
Begin
A:=123;
Writeln(A div 100+A div 10 mod 10+A mod 10);
end.