Петя добавил слово "Выхухоль". В этом слове 8 букв. Каждая кодируется 16 битами, да еще 2 символа, итого - 10.
10 * 16 = 160 Бит
160 / 8 = 20 Байт
Ответ: 20
Cls
input a
b=a>=10 and a<=99
print b
Program z1;
var
a,b,c,d:integer;
begin
writeln('Введите число a и число b');
readln(a,b);
c:=sqr(max(a,b));
d:=min(a,b)+1;
writeln('Первое число ',c,', второе число ',d);
<span>end.
Исправил</span>
Program Anutka1506;
uses crt;
var
x,y,s,p: real;
begin
writeln('Введите числа:');
write('X='); readln(x);
write('Y='); readln(y);
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
s:=(x+y)/2;
p:=2*x*y;
if x<y then
begin
x:=s;
y:=p;
end
else
begin
x:=p;
y:=s;
end;
writeln('X=',x,' Y=',y);
end.
Alt вродебы..............................