1.

Задать с помощью условного оператора следующие действия: большее из трех данных чисел (a, b и с) уменьшить на 5.

2.

Вычислить значение выражения:

а) not (a < 15) or not (b < 30);

b) с or b and (b = 20);

если а = 10, b=20, с = true, d=false.

3.

Определить значение логического выражения:

(-3>=5) or not (7<9) and (0<3).

4.

Имеется условный оператор:

If  D10 then writeln (‘ура!’) else Writeln (‘плохо… ’);

Можно ли заменить его следующими операторами:

If  D=10 then writeln (‘ура!’) else Writeln (‘плохо… ’);

If  not (D=10) then writeln (‘ура!’) else Writeln (‘плохо… ’);

If  not (D=10) then writeln (‘плохо…’) else Writeln (‘ура!’);

If  not (D10) then writeln (‘плохо…’) else Writeln (‘ура!’);

5.

Какими будут значения переменных j, k после выполнения условного оператора:

if j>k then j:=k-2 else k:=k-2 if j>k then j:=k-2 else dec (k,2);

если исходные значения переменных равны:

а) j=3, k=5

б) j=3, k=3

в) j=3, k=2?

6.

Запишите условный оператор, в котором значение переменной вычисляется по формуле:  a + b,  если а – нечетное и a*b, если а – четное.

7.

Вычислить значение функции:

8.

Написать программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу (0,5).

9.

Вывести на экран большее из двух данных чисел.

10.

Даны целые числа a, b, c. Если a <= b <= c, то все числа заменить их квадратами, если

a  > b > c, то каждое число заменить наибольшим из них, в противном случае сменить знак каждого числа.

11.

Найти наименьшее из трех данных чисел.

12.

Вывести на экран номер четверти, которой принадлежит точка с координатами (x,y), при условии, что x и y отличны от 0.

13.

Вычислить значение функции:

14.

Даны три целых числа, найти среднее из них. Средним назовем число, которое больше наименьшего из данных чисел, но меньше наибольшего.

15.

Написать фрагмент программы, подсчитывающий сумму только положительных из трех данных чисел.

16.

Даны три числа. Написать фрагмент программы, подсчитывающий количество чисел, равных нулю.

17.

После выполнения операторов

a := 0;

if a0 then a := 2

значение переменной равно 2. Объясните почему.

18.

Каким будет значение переменной а после выполнения операторов:

a:=3;

if a<4 then begin

Inc(a,2);

Inc(a,3);

end;

19.

Чему равны значения переменных А и В после выполнения последовательности действий:

а)  a:=15 DIV (16 mod 7); b:=34 mod a*5 – 29 mod 5*2;

б) a:=4*5 Div 3 Mod 2; b:=4*5 Div (3 Mod 2);

20.

Составьте программу, которая уменьшает первое число в пять раз, если оно больше второго по абсолютной величине.

21.

Составьте программу вычисления выражения:

а) max(x+y+z, xyz)+3;

б) min(x²+y², y²+z²)-4;

если x,y,z введены с клавиатуры.

22.

Составить программу для вычисления значения функции:

, для любого Х.