var I:integer; begin writeln (' загадайте число умножьте на 5, прибавьте 8, умножьте 2 и введите что получилось');
readln(I); writeln(((I div 2)-8) div 5); end.
#include <iostream>
#include <iterator>
#include <vector>
using namespace std;
int main() {
int n = 5;
int m = 6;
vector<vector<int>> a(n, vector<int>(m));
for (int i = 0; i < n; ++i) {
for (int j = 0; j < m; ++j)
cin >> a[i][j];
}
vector<double> ans(m);
for (int i = 0, q = 0; i < m; ++i, ++q) {
int sum = 0;
int cnt = 0;
for (int j = 0; j < n; ++j) {
if (a[j][i] < 0) {
sum += a[j][i];
++cnt;
}
}
if (sum)
ans[q] = sum / (double)cnt;
}
copy(ans.cbegin(), ans.cend(), ostream_iterator<double>(cout, " "));
}
var i:integer ;begin writeln ('загадайте число ,умножте на 5,прибавте 8,умножте на 2 и введите что получилось '); readln(i);writeln (((i div 2)-8)div 5); end.