<em>6</em><em>3</em><em>0</em><em /><em>:</em><em /><em>у</em><em /><em>=</em><em /><em>9</em><em>0</em>
<em>у</em><em /><em>=</em><em /><em>6</em><em>3</em><em>0</em><em /><em>:</em><em /><em>9</em><em>0</em>
<em>у</em><em /><em>=</em><em /><em>7</em>
<h3>
<em>про</em><em>верка</em><em>:</em></h3>
<em>6</em><em>3</em><em>0</em><em /><em>:</em><em /><em>7</em><em /><em>=</em><em /><em>9</em><em>0</em>
<em>9</em><em>0</em><em /><em>=</em><em /><em>9</em><em>0</em>
Var a,b,c:real;
begin
readln(a,b,c);
if (a=b) or (b=c) or (a=c) then writeln('true')
else writeln('false');
end.
ASCII - 1 байт на символ
15*s*25*1 = 175.8*1024 байт
s = 175.8*1024/15/25/1 = 480.0512
значит строк немного больше 480
uses crt;
var a,b,c:real;
begin
write('Введите A,B,C: ');
read(a,b,c);
writeln(power(exp(1), (sin(a+b)/cos(a+b))/sin(a)-ln(c) )*sin((sqrt(sqrt(c)+a))/cos(sqrt(a)))/cos((sqrt(sqrt(c)+a))/cos(sqrt(a)))*ln( (sqrt( (a+b)/sqrt(a)+sqrt(b) )-c)/(c+( (c+sqrt(5*a))/c+(sqrt(a+b))/(b*sqrt(c)) )) ):0:5);
<span>end.</span>