X=(input())
y=(input())
z=x
m=y
x=0
y=0
x=m
y=z
print(x)
print(y)
Program rrr;
var a,s:longint;
begin
read(a);
s:=455545656566556;
if (a mod 4)=0 then s:=a div 2
else s:=a;
write(s);
end.
Плутон(Это планета карлик)
Или Уран Если у вас не считают плутон
Var
x, y: real;
begin
write('x = ');
readln(x);
if (x <= 2) then
y := sqr(x) + 4 * x + 5
else
y := 1 / (sqr(x) + 4 * x + 5);
writeln('F(x) = ', y);
end.
1)Функция
program fun;
function f(m,n : real):real;
var
k,x,y : real;
begin
x:=5*m+pi/3;
y:=3*n-pi/3;
k:=(cos(2*x)*cos(2*x))/(cos(y)+cos(pi/4));
f:=k;
end;
var
a,b : real;
begin
writeln('Введите число a= ');
read(a);
writeln('Введите число b= ');
read(b);
writeln('F= ',f(a, b):0:2);
end.
2) Процедура
program fun;
procedure f(m,n : real);
var
k,x,y : real;
begin
x:=5*m+pi/3;
y:=3*n-pi/3;
k:=(cos(2*x)*cos(2*x))/(cos(y)+cos(pi/4));
writeln('F=',k:0:2);
end;
var a, b :real;
begin
writeln('Введите число a= ');
read(a);
writeln('Введите число b= ');
read(b);
f(a,b);
end.