Ребят, подкорректируйте решение Var n,m,t,k,f:integer; begin readln(n,m); k:=n mod 10000; f:=m mod 10000; t:= ((f-1) div k)+1; writeln(t); end. Нужно чтоб на вход n и m были не больше 10000
Ребят, подкорректируйте решение Var n,m,t,k,f:integer; begin readln(n,m); k:=n mod 10000; f:=m mod 10000; t:= ((f-1) div k)+1; writeln(t); end. Нужно чтоб на вход n и m были не больше 10000
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Не понятно, что требуется сделать?
Программа работает, выдает решение.
Ошибка появляется только в тех случаях, когда k получается равным 0.