#include <iostream>
using namespace std;
int main(){
long long x1,x2,y,y2;
cout<<"Enter x1:";
cin>>x1; // вводим начальную координату по горизонтали
cout<<"Enter y1:";
cin>>y; // вводим начальную координату по вертикали
cout<<"Enter x2:";
cin>>x2; // вводим конечную координату по горизонтали
cout<<"Enter y2:";
cin>>y2; // вводим координату координату по вертикали
if(x1 - y == x2 - y2 || x1 + y == x2 + y2){
cout << "YES";
}
else{
cout << "NO";
}
}
else{
cout << "NO";
}
}
1) и 2):
a = [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89]
b = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13]
c = []
for i in range(len(a)):
for j in range(len(b)):
if a[i] == b[j]:
c.append(a[i])
print(list(set(sorted(c # сортировка по возрастанию
print(list(set(sorted(c, reverse=True # сортировка по убыванию
3):
a = [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89]
for elem in a:
if elem < 5:
print(elem,end = ' ')
4)
a = []
for i in range(102):
if i == 100:
a.append(1)
elif i == 101:
a.append(1)
else:
a.append(0)
print(a)
5)
a = []
for i in range(90):
if i % 2 == 0:
a.append(i)
print(a)
print(len(a))
Объяснение:
НА ВЕРНОЕ ВОТ ТАК
// PascalABC.Net
var a: array [1..20] of integer;
i, count: integer;
begin
for i := 1 to 20 do
begin
a[i] := random(1, 50);
write(a[i]:4);
end;
writeln();
count := 0;
for i := 1 to 20 do
begin
if a[i] = 4 then
inc(count);
end;
writeln('Число 4 встречается в массиве ', count, ' раз.');
end.