|
|||||||
АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция |
Контрольная работа № 2. 1. Опишите все операторы, которые используются в алгоритмическом языке, для ввода и печати логических данных1. Опишите все операторы, которые используются в алгоритмическом языке, для ввода и печати логических данных. Приведите примеры. Напечатайте таблицы истинности для логических операций. Представьте в виде блок-схемы. 2. Почему в алгоритмическом языке, как правило, не больше двух операторов, предназначенных для программирования ветвящихся алгоритмов, и несколько (больше двух) операторов, предназначенных для программирования циклических алгоритмов? 3. Какую задачу решает приведенный ниже фрагмент программы? Каким соотношениям должны удовлетворять переменные a, b, c, d, чтобы задача могла быть решена? Приведите все возможные соотношения. Опишите правила выполнения оператора ввода в заданном фрагменте. s:= 0; p:= 1; read (a, b, c,d); x:= a; while x <= d do begin if x < c then s:= s + x else if x > b then p:= p * x; x:= x + 1 end; 4. Установите, что делает фрагмент программы. Перпишите его, используя оператор цикла с постусловием. s:= 0; read (a); while a <> 0 do begin if a mod b = 0 then s:= s - a; read (a) end; 5. Установите, что делает фрагмент. Запишите его в более понятной форме на алгоритмическом языке. Запишите фрагмент, который бы повторял ввод до тех пор, пока требуемое условие не выполнилось бы. if (mes-1)*(mes-12) > 0 then вывод “ОШИБКА” else вывод “ВЕРНО” 6. Укажите формулу, которая вычисляется программой:
7. Напишите программу, вычисляющую: а). . Здесь n вложений модуля. б). . Здесь всего n вложений функций. 8. Напечатайте таблицу функции на отрезке -p/2 до 3p/2 с шагом p/18. Таблица должна быть разделена горизонтальными линиями при изменении значения функции на единицу. 9. Каждую минуту девочка Ю. строит три песочных пирожных. Каждые две минуты мальчик Я. разрушает два пирожных. Сколько пирожных будет построено через n минут, если каждые четыре минуты одно пирожное рассыпается самостоятельно? Напишите программу для решения этой задачи. 10. Первое любимое число Незнайки - 1, второе - 5. Каждое следующее число получается как сумма удвоенного предыдущего и предпредыдущего чисел. Так третье любимое число - 11, а четвертое - 27. Вычислите сумму любимых чисел Незнайки среди первой тысячи. Напишите программу для решения этой задачи. 11. Найдите все такие трехзначные числа, которые делятся на каждую из цифр в их записи. Напишите программу для решения этой задачи. 12. Автомат, приклеивающий этикетки, работает со светлыми, зелеными и темными бутылками, в которые наливаются светлые и темные жидкости. Темные бутылки с темной жидкостью автомат разбивает. Сколько бутылок из 2007 штук разобъет автомат? Вид бутылки и жидкости в ней задаются случайным числом. Напишите программу для решения этой задачи. 13. Выведите на экран фигуру указанного вида, зависящего от n. n = 3 **__** n = 4 **__**__ **__** **__**__ __**__ __**__** __**__ __**__** **__** **__**__ **__** **__**__ __**__** __**__** 14. С клавиатуры вводится строго возрастающая последовательность натуральных чисел до тех пор, пока произведение трех соседних введенных чисел не превысит 100. Вычислите сумму факториалов всех введенных чисел. Эта работа должна быть выполнена как можно более эффективно, без лишних повторов. Напишите программу для решения этой задачи. 15. Правильно ли записаны на Паскале операторы цикла. Если да, то подсчитайте, сколько раз они выполняются. Если нет, то объясните в чем ошибки. а). while false do i:= i + 1; б). for u:= 2*a downto -1 do i:= i + 1; Поиск по сайту: |
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.004 сек.) |