В базе данных маркетингового агентства хранятся данные о количестве просмотров рекламных объявлений (количество просмотров) и об отношении количества переходов по ссылке к количеству просмотров объявления (CTR). Известно количество записей, полученных в ответ на ряд запросов к этой базе: 1. Количество просмотров > 10 тыс. и количество просмотров 10 тыс. и количество просмотров 10% – 24 записи. Сколько записей будет получено в ответ на запрос: Количество просмотров 10%? В ответе укажите целое число.
s: string;
a, b: integer;
begin
readln(s);
if s[1] = 'x' then begin
a := StrToInt(s[3]);
b := StrToInt(s[5]);
if s[2] = '-' then a := -a;
writeln(b - a);
end
else if s[3] = 'x' then begin
a := StrToInt(s[1]);
b := StrToInt(s[5]);
if s[2] = '-' then begin
a := -a;
b := -b;
end;
writeln(b - a);
end
else if s[5] = 'x' then begin
a := StrToInt(s[1]);
b := StrToInt(s[3]);
if s[2] = '-' then
b := -b;
writeln(a + b);
end
end.
учтите что никакой защиты от дурака или неверного ввода