Простая задача на цикл

[type_Oleg]

Делайте с Ceil, потому что div и Floor округляют до меньшего.
В том то и дело, что надо до большего.

[Аватар]

Делайте с Ceil, потому что div и Floor округляют до меньшего.

Черт, точно. Спать пора

[BDA]

В 4 и 5 тестах совершенно очевидно неправильно работает формула (N-3*K) div 2, так как нужно делить вещественно и искать первое целое число, большее или равное полученному частному. В 9-11 тестах происходит переполнение (не хватает integer).

Да уж, сначала нужно нажимать F5, а не "Отправить"

type_Oleg - насчет K <= N. Во-первых, в условии четко сказано, что это так. Во-вторых, если это по каким-то причинам не так, программа ничего не выдаст, а должна выдать 0 (к вопросу о расстановке begin..end).

[Оляя]

Вообще УЖАС!!!!
Опять неполное решение, про чем в программе все работает, а в тестирующей системе ошибки!!!!5.jpg

[BDA]

Попробуем еще разок
L O N G I N T

[Оляя]

С L O N G I N T[/QUOTE], не прошел 1 тест из 11

====== Тест #11 =======
--- Входные данные ---
1000000000
1000000000

--- Результат работы программы ---
-999999999
--- Правильный ответ ---
0

--- Ошибки ---

--- Вывод проверяющей программы ---
Несовпадение ответов: вывод: -999999999, эталон: 0

в зад сказано, что К д.б. не МЕНЕЕ 1/3, т.е. более можно...Не соображаю, как написать...

[type_Oleg]

Оляя, а что, то что мы предлагали - не проходит?
Я сейчас посмотрел.
Есть в этом PascalABC.net функция Ceil. Правда, не понял, в каком модуле. Вроде прямо в System. Непонятно, почему Оляя пытается вместо нее что-то ногородить с div и mod. Бьется, как белка об лед.

Кстати, там что Integer, что Longint - одно и тоже.

[Serge_Bliznykov]

Сообщение от Оляя

, не прошел 1 тест из 11

====== Тест #11 =======
--- Входные данные ---
1000000000
1000000000

--- Результат работы программы ---
-999999999
--- Правильный ответ ---
0

--- Ошибки ---

а в лоб не пойдёт?

readln(N,K);
if K< (N div 3) then begin
  <ваш код по вычислению x>
end
else
  Write(0)
end.

[BDA]

type_Oleg, ну да, там одно и то же (про integer и longint). На сайте, скорее всего, FreePascal.
Оляя, посмотрите список доступных компиляторов на том сайте и выберите, если есть, PascalABC.
Serge_Bliznykov, да, так, наверное, пройдет. Мне просто непонятно, почему Оле доступны результаты тестирования, хотя они обычно скрыты. Кстати, контрпример для такого if N = 11 K = 3.

[type_Oleg]

У нее - в посте #14 - прям на картинке - ABC.net.
Может быть она пыталась uses Math, а там его нет наверное.
Я когда писал, не знал еще, какой Паскаль.

А ... пардон, я не понял, что про Паскаль на том сайте, куда ответы...