X2 -> S1
X1 & -X2 -> S2
-X1 & X2 -> -S2
S1 | S2 -> X1 | X2
| - дизъюнкция, & - конъюнкция, -> - импликация
Потребовалось кодировать больше символов, чем позволяла однобайтовая кодировка.
Const
n=10;
var
i:integer;
a,b:array[1..n] of integer;
c:array[1..n] of real;
begin
Randomize;
for i:=1 to n do begin
a[i]:=Random(20);
Write(a[i]:5);
b[i]:=Random(20);
c[i]:=(a[i]+b[i])/2
end;
Writeln;
for i:=1 to n do Write(b[i]:5);
Writeln;
for i:=1 to n do Write(c[i]:5:1);
Writeln
end.
Пример
12 15 9 18 13 10 6 15 4 11
3 16 3 0 17 0 19 12 0 5
7.5 15.5 6.0 9.0 15.0 5.0 12.5 13.5 2.0 8.0
Var
x,k:integer;
a:array[1..100] of integer;
begin
k := 0;
read(x);
while x <> 0 do
begin
k := k + 1;
a[k] := x;
read(x)
end;
writeln(k);
for x := 1 to k do
write(a[x],' ')
<span>end.</span>
Ответ:
#define _USE_MATH_DEFINES
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
float x, y, z;
bool b;
setlocale(LC_ALL, "Russian");
cout << "Введите x: ";
cin >> x;
cout << "Введите у: ";
cin >> y;
b = true;
if (x + 0.5 * y <= 1)
z = x / (pow(sin(y), 2));
else if (1 < x && 0.5 * y < 5)
z = pow(M_E, x) + pow(M_E, y);
else if (x + 0.5 * y >= 5)
z = log(3 * (x + y)) + 2.12;
else
b = false;
if (b)
cout << "z = " << z;
else
cout << "Значение z не определено.";
}