АЛГ
нач
цел Н, буф, _и, к
к := 0
вещ сред
сред := 0
ввод Н
нц для _и от 1 до Н
ввод буф
если (буф > 0) и (mod(буф, 2) = 0) то
к := к + 1
сред := сред + буф
все
кц
вывод сред / к
кон
алг
нач
цел _и
нц для _и от 5 до 8
вывод "Y(", _и / 10, ") = ", (2 * sin(_и / 10) * sin(_и / 10)) / (cos(_и / 10) * cos(_и / 10)), нс
кц
кон
"Винчестер", если о магнитном =)
Program idinah;
var a, b: real;
begin
write('a, b = ');
readln(a,b);
writeln('Среднее арифметическое = ',(a+b)/2);
end.
Вот если 1 число или более
#include <iostream>
#include <vector>
using namespace std;
int main()
{
vector<int> a;
bool flag = false;
int n;
cin >> n;
a.resize(n);
for (int i = 0; i < n; ++i) {
cin >> a[i];
}
for (int i = 0; i < n; ++i) {
if (a[i] < 0) {
flag = true;
break;
}
}
if (flag)
cout << "YES";
else
cout << "NO";
return 0;
}
Вот если 2 или более
#include <iostream>
#include <vector>
using namespace std;
int main()
{
vector<int> a;
bool flag = false;
int n, cnt = 0;
cin >> n;
a.resize(n);
for (int i = 0; i < n; ++i) {
cin >> a[i];
}
for (int i = 0; i < n; ++i) {
if (a[i] < 0) {
cnt++;
if (cnt == 2) {
flag = true;
break;
}
}
}
if (flag)
cout << "YES";
else
cout << "NO";
return 0;
}