Const
n = 40;
var
s,i,ind,k1,k2: integer;
mas: array[1..n] of integer;
begin
s := 0;
for i:=1 to n do s := s+ mas[i];
Writeln ('сумма элементов массива: ',s);
s := 1;
for i:=1 to n do s := s * mas[i];
Writeln ('произведение элементов массива: ',s);
s := 0;
for i:=1 to n do s := s + mas[i]*mas[i];
Writeln ('сумма квадратов элементов массива: ',s);
s := 0;
for i:=1 to 6 do s := s+ mas[i];
Writeln ('сумма первых 6 элементов массива: ',s);
ind:=0;
repeat
Writeln('Введите К1: '); read(k1);
Writeln('Введите К2: '); read(k2);
if (k2>k1) then ind := 1;
until (ind=1);
s := 0;
for i:=k1 to k2 do s := s+ mas[i];
Writeln ('сумма элементов массива с k1-го по k2-й: ',s);
end.
Если сумма цифр в числе кратна 3-м, то число делится на 3 без остатка. У меня получилось 9776544.
Проверяем 9+7+7+6+5+4+4=42, 42/3=14.
<span>#include <iostream>
using namespace std;
int main() {
int x1, x2, y1, y2;
cin >> x1 >> y1 >> x2 >> y2;
if ((x1 > 0 && y1 > 0) && (x2 > 0 && y2 > 0)) {
cout << "YES";
} else if ((x1 < 0 && y1 < 0) && (x2 < 0 && y2 < 0)) {
cout << "YES";
} else if ((x1 > 0 && y1 < 0) && (x2 > 0 && y2 < 0)) {
cout << "YES";
} else if ((x1 < 0 && y1 > 0) && (x2 < 0 && y2 > 0)) {
cout << "YES";
} else {
cout << "NO";
}
<span>}</span></span>
Может не работать с некоторыми дробными числами.