Исправьте ошибки Program massiv;
Const n=10;
Var a:array[1..n] of integer;
s,i: integer;
Begin
WriteLn('Исходныймассив:');
For i:=1 to n do
begin
a[i]:=random(10);
Write('a[',i,']=',a[i],' ');
WriteLn (' ');
end;
s:=0;
For i:=1 to n do
s:=s+a[i];
WriteLn('Сумма всех элементов массива S=',s);
end.
var
i, a, b, n, n2, j: longint;
s: string;
flag: boolean;
begin
Write('Введите через пробел границы диапазона: ');
Readln(a, b);
if b < a then begin n := a; a := b; b := n end;
if a < 11 then a := 11;
for i := a to b do
begin
Str(i, s);
n := Length(s); n2 := n div 2; flag := true; j := 1;
repeat
flag := (s[j] = s[n - j + 1]);
j := j + 1
until (not flag) or (j > n2);
if flag then Write(i, ' ')
end;
end.
Тестовое решение:
Введите через пробел границы диапазона: 800 1500
808 818 828 838 848 858 868 878 888 898 909 919 929 939 949 959 969 979 989 999
Объяснение:
Не бейте, я не знаю, что я написал. Надеюсь, тебе это .
#include <iostream>
#include <vector>
using namespace std;
template<typename a, typename b>
class myPair {
public:
myPair(a first, b second) : first(first), second(second) {
}
myPair operator+(myPair a) {
return myPair(first + a.first, second + a.second);
}
myPair operator-(myPair a) {
return operator+(myPair(-a.first, -a.second));
}
a first;
b second;
};
class complex : myPair<int, int> {
public:
friend myPair;
complex(int real, int imaginary) : myPair(real, imaginary) {
}
int real() {
return first;
}
int imaginary() {
return second;
}
complex operator+(complex a) {
return complex(myPair::operator+(a).first, myPair::operator+(a).second);
}
complex operator-(complex a) {
return complex(myPair::operator-(a).first, myPair::operator-(a).second);
}
complex operator*(complex a) {
return complex(real() * a.real(), imaginary() * a.imaginary());
}
};
int main() {
complex a(1, 2), b(10, 11);
cout << (a + b).real() << " " << (a + b).imaginary() << " " << (a - b).real() << " " << (a - b).imaginary() << " " << (a * b).real() << " " << (a * b).imaginary();
}