Program z25;
Var x,y,c:integer;
Begin
write('Введите x = '); readln(x);
write('Введите y = '); readln(y);
c:=x;
x:=y;
y:=c;
writeln('X = ', x);
writeln('Y = ', y);
End;
Ответ: 18
Решение:
Program zadacha;
Begin
Write(0 div 3-3 mod 2+4div 2+10+7*4div 3-10 mod 4);
<span>end.</span>
s=(х1)+(х2)+(3х)+(х4х)+(хn)+0,0001
Какая программа? тогда будет ответ