<u>PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var x:=ReadReal('x=');
var r:=Sqrt(Abs((Sqr(x**5-3)-5)/(5*x-7))+7)+10*x;
Print(r);
r:=Round(r);
Println(r)
end.
<u>Пример</u>
x= -12.502
36508.4531755161 36508
1) C. знак плюс. 2) В. Shortint. 3) D. string. 4) судя по предложенным вариантам - C. 4, есть такой, но real, например, 8 байт. 5) А. 3,5 нельзя через запятую. 6) C. Var. 7) C. Var a,b: integer; c: real. 8) D. A:=164. 9) C. B:=6.06. 10) A. C:='Informatika'. 11) D. D:='C'.
1.
МОСТ
длина четна ⇒ ГМОСТ ⇒ ДНПТУ
2.
ДНПТУ
длина нечетна ⇒ ДНППТУ ⇒ ЕОРРУФ