Не уточнили язык - получите паскаль. Мог бы сделать на С++
program Znanija;
var n,i:integer;
begin
readln(n);
if n < 0 then
begin
writeln('Я не разработал программ');
exit;
end;
write('Я разработал ', n, ' ');
case n of
1:writeln('программу');
2..4:writeln('программы');
0,5..10:writeln('программ');
end;
end.
Var a,b,c: integer;
begin clrscr;
write('Надо написать 1 число'); read(a);
write('Надо написать 2 число'); read(b);
if a<b then write('c=',a) else write('c=',b);
end.
Ответ:
#include <iostream>
#include <iomanip>
using namespace std;
int main()
{
int n;
double P=1;
cin >> n;
for(double i = 2; i <= 2*n;i+=2)
P *= i/(i+1);
cout << fixed << setprecision(3) << P;
}
Профессия работника железнодорожного транспорта-9 букв, вторая Р:
ПРОВОДНИК