1
2
3
4
10
11
12
13
14
20
21
22
23
24
30
31
32
33
34
40
2. Заменим "\/" - ИЛИ, "/\" - И.
X > 1 И ((x < 5) -> (x < 3)).
X > 1 И ( НЕ (x < 5) ИЛИ (x < 3)).
X > 1 И ((x > 5) ИЛИ (x < 3)).
"И" - знак умножения.
"ИЛИ" - знак сложения.
Получаем, что "x" обязательно должен быть больше единицы и либо больше 5, либо меньше 3.
В итоге подходит только "2".
Ответ: 2.
4.
1 - не подходит ко второй строке.
2 - не подходит ко второй строке.
4 - не подходит к первой строке.
Проверяем третий вариант:
(X -> y) * z = (НЕ (x) + y) * z.
1. (1+0)*1 = 1.
2. (0+0)*1 = 0.
3. (0+1)*1 = 1.
Ответ: 3.
5.
1 - не подходит ко второй строке.
2 - не подходит к первой строке.
4 - не подходит к первой строке.
Проверим третий вариант:
1. 1*0*0*1*0*0*0 = 0.
2. 1*1*1*1*1*1*1 = 1.
3. 1*0*0*1*0*1*1 = 0.
Ответ: 3.
Вот такая блок-схема получилась. слева основная программа, справа подпрограмма СЦЧ (сумма цифр числа): получает на вход число и суммирует составляющие его цифры
60+70=130 (км/ч) скорость удаления130*3=390 (км)Ответ: будет 390 (км)
Var A : array [1..2, 1..5] of integer;
i,j,pr:integer;
Begin
pr:=1;
Writeln('Ведите значения в массив');
for i:=1 to 2 do
for j:=1 to 5 do read(A[i,j]);
for i:=1 to 2 do
for j:=1 to 5 do
if ( (A[i,j] mod 2 = 0) and (A[i,j] mod 3 <> 0) ) then pr:=pr*A[i,j]; Writeln('Произведение = ',pr)
End.