Ответ:
#include <iostream>
#include <string>
#include <sstream>
using namespace std;
template <typename T>
std::string toString(T val)
{
std::ostringstream oss;
oss<< val;
return oss.str();
}
template<typename T>
T fromString(const std::string& s)
{
std::istringstream iss(s);
T res;
iss >> res;
return res;
}
int main()
{
string number;
short int param;
cin >> param;
char i1,i2,i3,i4,i5,i6;
long long i,counter;
counter =0;
for(i=100000;i<=999999;i++){
number= toString(i);
i1 = number[0] ;
i2 = number[1] ;
i3 = number[2] ;
i4 = number[3] ;
i5 = number[4];
i6 = number[5];
if((i1+i2+i3) == (i4+i5+i6) && (i4+i5+i6) == param) {
cout << i1+i2+i3 <<" = "<<i4+i5+i6<<endl;
counter++;}
}
cout << counter;
return 0;
}
Объяснение:
Как вариант на c++:
#include <iostream>
using std::cin,std::cout;
int main(){
int k,F,D;
cout << "Введите D ";
cin >> D;
cout << "Введите F ";
cin >> F;
if(D>0){
k = F*D+8*D;
}
else{
k = (D+F)*(D+F) + 5*D;
}
cout << k;
return 0;
}
//PascalABC.Net 3.1.0.1200
var
c: char;
begin
readln(c);
if c in ['0'..'9'] then
writeln(ord(c))
else
writeln(chr(ord(c) + 1), chr(ord(c) + 2));
if c in ['A'..'Z'] then
writeln(LowCase(c));
end.
Var a:integer;
begin
read(a);
write((a mod 10)*100+(a div 10 mod 10)*10+a div 100)
<span>end.</span>