прошу помогите
Андрей очень любит ездить по железной дороге. Он садится у окна и внимательно следит за местностью, которую он проезжает. Особенно он обращает внимание на километровые столбы. Каждый столб с километражем, который при делении на 7 дает в остатке 3, он считает «счастливым». Составьте программу, которая бы определяла количество «счастливых» столбов, если во время езды он проезжает столбы с отметками от a до b.
Входные данные1
26 49
Выходные данные1
3
Входные данные2
3 10
Выходные данные2
2

Ответы

Ответ дал: Аноним
1
простой вариант:

var
  i, c, a, b : integer;
begin
  c := 0;
  read (a, b);
  for i := a to b do
    if (i mod 7 = 3) then
      c := c + 1;
  write (c);
end.

оптимальный вариант

var
  a, b : integer;
begin
  read (a, b);
  while a mod 7 <> 3 do
    a := a + 1;
  while b mod 7 <> 3 do
    b := b - 1;
  if (a <= b) then
    write ((b - a) div 7 + 1)
  else
    write (0);
end.


Приложения:

Аноним: Вы не поверите, но выходные данные даются для тестового решения, чтобы составив программу, человек мог её запустить и убедиться, что она работает верно.
Аноним: в том числе. однако тестовые примеры из условия обычно крайне примитивны и не проверяют крайних случаев, поэтому ошибку вряд ли можно отловить на тестовых примерах.
кроме того, тогда совершенно непонятно, зачем они даются тогда, когда программу запускать нельзя, например, на ЕГЭ по информатике.
Аноним: Когда на ЕГЭ - там действительно для "бумажной" трассировки, но тут у нас не ЕГЭ и если Вас модератор просит дать тестовое решение, то не нужно пускаться в глобальные рассуждения.
Аноним: Модератора убедит добавленная в ответ после текста программы выдача... копипаст пока что никто не отменял
Аноним: Успешно time: 0 memory: 276 signal:0
2
Успешно time: 0 memory: 232 signal:0
3

господи, вы понимаете, что выдача выглядит вот так, и написать её от балды мне даже легче, чем открывать компилятор?
Аноним: Вот и напишите, хоть "от балды". Потому что видимо Вы не понимаете, что потом задание с решением в архив пойдет и там комментариев этих всех уже не будет.
Аноним: И потом, Вы серьезно думаете, что я не представляю, как выглядит выдача?
Аноним: Кстати, в Вашем "от балды" я не увидел вводимых данных
Аноним: я думаю, что писать от балды абсолютно бессмысленно. или вы садист, или вы чего-то не понимаете. в задании есть формулировка: "составьте программу". всё, тестировать её вовсе не просили.
Аноним: Еще раз: если приведен набор входных и выходных данных, должно быть приведено тестовое решение. Если нет - достаточно текста программы.
Похожие вопросы