Напишите программу, выводящую слова «зачет», если введено число 3, 4 или 5 и «незачет», если введено число 1 или 2. заранее .

Begin
var z:integer:=readinteger('Введите оценку');
case z of
1,2:println('Незачёт') else println('Зачёт');
end;
end.

Переход к информационному обществу совпал с острой фазой информационного кризиса - наиболее болезненной, мешающей дальнейшему развитию цивилизации проблемы. Общество столкнулось с противоречием между ограниченными возможностями человека по восприятию и переработке информации и существующими огромными потоками и массивами хранящейся информации. Необходимо согласовать информационный "голод" и информационную "лавину". Поэтому главным и наиболее ожидаемым положительным последствием информатизации должно стать преодоление этой проблемы. Одним из начальных шагов решения этой сложной задачи является разработка современных информационных технологий. Они должны позволить формулировать запрос на выполнение любых операций с информацией на языках, близких к естественному, эффективно отсекатьинформационный шум, доставлять нужные сведения в удобной для пользователя форме.

Другой важной задачей информатизации является реализация свободного доступа каждого человека к информационным ресурсам всей цивилизации. Сейчас этот доступ в значительной степени ограничен административными, межгосударственными и экономическими барьерами. Государство, международные организации через законодательные акты, соглашения, целевые программы должны разумно отрегулировать доступ к информации, обеспечивающей эффективное развитие цивилизации. Разумность регулирования заключается в том, что имеется опре-деленный спектр информации, закрытие которой обосновано государственными или корпоративными интересами. Процессы информатизации должны определить разумные границы доступа. Кроме этого, доступ должен быть согласован с соблюдением авторских прав. Основным принципом информационного обществадолжно стать утверждение: "Ограничение свободного распространения информации наносит вред государству".

• нажмите кнопку Пуск –> в текстовое поле Найти программы и файлы введите выполнить –> нажмите ссылку Выполнить;       – в текстовое поле Открыть диалогового окна Выполнить введите требуемую команду (или с кнопки Обзор… выберите требуемую программу) –> нажмите OK;         • нажмите клавишу с логотипом Windows (флажок Microsoft) + R;     • или же можно после нажатия кнопки Пуск в текстовое поле Найти программы и файлы ввести – не запуская диалоговое окно Выполнить! – требуемую команду (имя программы), которую нужно запустить (выполнить).