Var
a,b : array[1..8, 1..8]of integer;
i, j,k, x, y, x1, y1:integer;
begin
k:=-1;
for i:= 1 to 8 do
begin
k:=-k;
for j:= 1 to 8 do
begin
a[i,j]:=k;
b[i,j]:=k;
k:= -k;
end;
end;
Readln(x,y);
Readln(x1,y1);
if (a[x,y] = b[x1,y1]) then Writeln('YES')
else Writeln('NO');
end.
#include<iostream>
#include<cmath>
int main() {
double a,b;
std::cin>>a>>b;
std::cout<<"Среднее арифметическое "<<(a+b)/2<<std::endl;
std::cout<<"Среднее геометрическое "<<sqrt(abs(a)*abs(b));
}
For A = 1 To 10
If A mod 2 <> 0 Then
Print A * A
End if
Next A
1.1 байт= 8 бит
2. нет. неверно. 'Иванова'>'Иванов' в 1 случае -9 бит, а во 2- 8