Просмотр содержимого документа
«Практическая работа "Алгоритмы с ветвлением"»
Практическая работа «Алгоритмы с ветвлением»
Вариант 1
Задание 1. (на 2 балла)
Определите условия, правильно записанные на языке Pascal.
а) х 0 б) с = в) (а 0) and (b0) | г) а д) х 0, y | е) 5 y ж) 8 mod 2 = 0 |
Задание 2. . (на 4 балла)
Определите условия, истинные при х = -3, у = 2, z = 5.
а) y = z + х
б) 2 sqr (x)
в) х + у + z 4
НА 6
Задание 3. . (на 6 баллов)
| Условие | Запись на языке Pascal |
-
| величина х — положительна | |
-
| 0 х 5 | |
-
| А ≤ 5 | |
-
| величины х и у — отрицательны | |
-
| х [0; 4] | |
-
| x [0; + ∞) | |
-
| величина х — четная | |
-
| х кратно 3 | |
-
| х не делится на 5 | |
Задание 4. . (на 7 баллов)
Проанализируйте программу, которая записана ниже. Что будет выведено на экран
при а)х = -5, б)х = 3, в) х = 0?
Program prim1;
Var x:integer;
Begin
writeln ('Введите число ');
read(x);
if xДа ') else writeln ('Нет ') End.
Из задания 5-7 учащимся выбирается одна задача по желанию в зависимости от уровня знаний и умения решать задачи
Задание 5. (на 8 баллов)
Введите число N. Проверьте, делится ли это число нацело на число A.
Задание 6. (на 9 баллов)
Введите вес (в килограммах) трех друзей Сергея, Паши и Максима. Узнайте кто из них самый тяжелый.
Задание 7. (на 10 баллов)
Напишите программу для решения линейного неравенства вида
a*x b
Практическая работа «Алгоритмы с ветвлением»
Вариант 2
Задание 1. (на 2 балла)
Определите условия, правильно записанные на языке Pascal.
а) 5 у в) х = y | г) а =b*2 д) х,у0 е) х=5 | ж) х 0 or y э) х = у =z |
Задание 2. . (на 4 балла)
Подчеркните условия, истинные при х = -3, у = 2, z = 5.
а) z mod 2 = 1
б) z div у = 2
в) х - y= -z
Задание 3 . (на 6 балла)
| Условие | Запись на языке Pascal |
-
| величина х — неотрицательна | |
-
| х ≠ 10 | |
-
| х 0, у ≤ 5 | |
-
| x (-5; 5] | |
-
| x ( - ∞; 0] | |
-
| величина х — нечетная | |
-
| х делится без остатка на 2 и на 3 | |
-
| х не делится на 7 | |
Задание 4. . (на 7 баллов)
Проанализируйте программу, которая эаписана ниже. Что будет выведено на экран
при х = 5, х = -7, х = 0?
Program prim1;
Var x:integer;
Begin
writeln ('Введите число ');
read(x);
if x0 then writeln ('Да ') else writeln ('Нет ') End.
Из задания 5-7 учащимся выбирается одна задача по желанию в зависимости от уровня знаний и умения решать задачи
Задание 5. (на 8 баллов)
Введите число. Если введенное число равно нулю, то увеличьте его на 5, иначе вычислите обратное число.
Задание 6. (на 9 баллов)
Введите рост (в сантиметрах) трех подружек Маши, Наташи и Оли. Узнайте, какая из подружек самая маленькая.
Задание 7. (на 10 баллов)
Напишите программу для решения линейного неравенства вида
a*x ≥ b