from math import ceil n, m = [int(input(x + ' = ')) for x in ['n', 'm']] print('ответ:', ceil(m / n))
Daletskaya Sergei1121
27.08.2021
Решение для одного-двух разных удаляемых символов
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016 // Внимание! Если программа не работает, обновите версию!
begin var s:=ReadlnString('>'); s:=s.Replace('.','').Replace(',',''); s.Println end.
Пример > Раз, два, три, четыре, пять. Вышел зайчик погулять. Раз два три четыре пять Вышел зайчик погулять
Решение, когда разных удаляемых символов может быть много
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016 // Внимание! Если программа не работает, обновите версию!
begin var s:=ReadlnString('>'); s:=s.Where(с->not(с in [',','.'])).JoinIntoString; s.Println end.
iskypka
27.08.2021
// PascalABC.NET 3.0, сборка 1157 от 02.02.2016 begin var n:=ReadInteger('n='); if n<0 then Writeln(n,'! не определено: n<0') else if n=0 then Writeln('0!=1') else begin var p:BigInteger:=1; for var i:=2 to n do p*=i; Writeln(n,'!=',p) end end.
from math import ceil
n, m = [int(input(x + ' = ')) for x in ['n', 'm']]
print('ответ:', ceil(m / n))