Ответ:
#include <iostream>
#include <cmath>
using namespace std;
int main() {
int x,y;
cin >> x >> y;
cout << ((sin(x)+cos(x))/(cos(x)-sin(x)))*tan(x*y);
}
Объяснение:
Var
s:string;
i:integer;
begin
readln(s);
for i:=1 to length(s) do
if i mod 2 =0 then write(s[i],s[i])
else write(s[i]);
end.
var a:array[1..10] of integer;
i:byte;
begin
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
writeln(a[i]*2);
end.