Вопрос сформулирован скорее всего неверно
Если отвечать по существу исходя из того что понял, то можно перефразировать как "придумайте информационные услуги"
Если поискать в поисковиках, то по моему перефразированному вопросу можно найти ответ, всего доброго!
a = float(input('a = '))
c = input()
b = float(input('b = '))
if c == "-" :
////print (a-b)
elif c == "/" :
////if c != "0" :
////////print (a/b)
////else :
////////print("Деление на ноль!")
elif c == "*":
////print(a*b)
elif c == "mod":
////print (a % b)
elif c == "pow":
////print(a ** b)
elif c == "div":
////print(a // b)
elif c == "+":
////print(a+b)
все '/' ето 1 пробел
Чистая математика. Давай считать.
30 кбайт это 30720 байт.(в 1 кб 1024 б.)
Каждый символ это 2 байта, тогда всего у нас 15360 символов(30720/2).
В каждой строке 64 символа. 15360/64 = 240 строк.
Всего в файле 20 страниц. 240/20 = 12 строк.
Итого на каждой странице по 12 строк.
Элементарно!
1) Разбиваем 27 монет на 3 кучки по 9 монет. Сравниваем 2 кучки.
Какая легче - в той и фальшивая монета. Если они равны, то фальшивая в третьей кучке, которую не взвешивали.
Получилась кучка из 9 монет, одна фальшивая. Осталось 2 взвешивания.
2) Точно также разбиваем 9 монет на 3 по 3 монеты и сравниваем две.
Какая легче - в той и фальшивая монета. Если они равны, то фальшивая в третьей кучке, которую не взвешивали.
Получилась кучка из 3 монет, одна фальшивая. Осталось 1 взвешивание.
3) Сравниваем 2 монеты. Какая легче - та и фальшивая.
Если они равны, то фальшивая третья, которую не взвешивали.
Var n,i:integer;
begin
for n:=2 to 99 do
begin
for i:=2 to 99 do
begin
if (n+i)=(n*i) then writeln(n,' ',i);
end;
end;
end.<span>
</span>