Язык не указан, предположим что нужен кто то из популярных: Паскаль или Питон.
PascalABC.NET:
#1 (По умному)
begin
var a := Range(1, ReadInteger('N = '));
a.Sum.Println;
a.Aggregate(BigInteger.One, (p, q) -> p*q).Println;
end.
#2 "А нас учили по другому"
begin
var N := ReadInteger();
var sum:int64 := 0;
var prod:BigInteger := 1; //Для большого N произведение не влезет в int64, по этому юзаем бесконечное целое число BigInteger
for var i := 1 to N do begin
sum += i;
prod *= i;
end;
Println(sum, prod);
end.
#3 Вариант на Питоне
summ, prod = 0, 1
for i in range(1, int(input())+1):
summ += i; prod *= i
print(summ, prod)
Объяснение:
#include<fstream>
#include <iostream>
#include <algorithm>
#include <string>
#include <map>
int main()
{
std::string fname;
//ввод названия текстового файла
std::cin >> fname;
std::ifstream file(fname);
std::string text((std::istreambuf_iterator<char>(file)) ,std::istreambuf_iterator<char>());
file.close();
std::map<char, char> rs = {{'9', '0'}};
for (char i = '0'; i < '9'; ++i) rs.insert({ i,i+1 });
char r;
std::replace_if(text.begin(), text.end(), [&](char c) { return r = rs[c]; }, r);
std::ofstream out("result.txt");
out << text << std::endl;
out.close();
return 0;
}
