Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.01.2014, 01:43   #31
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Та там описка, заменить y:=(x-k) mod 2; на y:=(x-k) div 2;
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 12.01.2014, 02:42   #32
Оляя
Пользователь
 
Регистрация: 11.01.2014
Сообщений: 11
По умолчанию

Аватар, еще хуже(((
Оляя вне форума Ответить с цитированием
Старый 12.01.2014, 03:22   #33
Оляя
Пользователь
 
Регистрация: 11.01.2014
Сообщений: 11
По умолчанию Решено!!!!!!!!!Ура!!!

Благодаря всем ВАМ мои мозги шевелились и даже появился некий азарт
Поиграя с данными и учитывая все ВАШИ предложения и мысли, я вышла на след код, кот дал полное решение задачи:

Код:
Program Str1;
VAR N,K,x,r: longint;

BEGIN
Readln(N,K); 
if n>= 3*k then BEGIN
                x:=(N-3*K) div 2;
                r:= (N-3*K) mod 2;
                If ((x<1) or (r>0))then x:= x+1;
                end
 else  x:=0;
Write(x);
           
END.
Кстати, если использовать integer, а не longint , решение проходит только 7 тестов из 11.

А теперь для очень любопытных. которым интересно, почему есть доступ к проверяющим данным: эта одна из олимпиадных задача для учащихся 8 классов, которая уже прошла, а доступ для преподов остался...(разбора задачи этой нигде не смогла найти)

Последний раз редактировалось Serge_Bliznykov; 12.01.2014 в 14:01.
Оляя вне форума Ответить с цитированием
Старый 12.01.2014, 11:47   #34
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Цитата:
Аватар, еще хуже(((
Специально на сайте зарегился, не понял где хуже, все 11 тестов задача прошла, 100 балов заработал
Код:
Program Str1;
var x,y,n,k: longint;
begin
  Readln(N,K);
  x:=n-k-k;
  if x>k then begin
    y:=(x-k) div 2;
    if y*2<x-k then Inc(y);
  end
  else y:=0;
  Write(y);
end.
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 12.01.2014, 11:51   #35
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Цитата:
Специально на сайте зарегился, не понял где хуже, все 11 тестов задача прошла, 100 балов заработал
А можно ссылку? А то там 4 мильёна ссылок.. и бегать по всех не хочется.. Спасибо!
Poma][a вне форума Ответить с цитированием
Старый 12.01.2014, 11:54   #36
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

BDA давал же http://informatics.msk.ru/mod/statem....php?id=9742#1
От туда и зарегистрировался, вроде все просто, даже без email
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 12.01.2014, 11:56   #37
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Цитата:
ВDA давал же http://informatics.msk.ru/mod/statem....php?id=9742#1
От туда и зарегистрировался, вроде все просто, даже без email
Не.. мне бы ту, куда сдает ТС..
Poma][a вне форума Ответить с цитированием
Старый 14.01.2014, 20:16   #38
Оляя
Пользователь
 
Регистрация: 11.01.2014
Сообщений: 11
По умолчанию

Спасибо ОГРОМНОЕ Аватар, может я что-то не правильно дописала в вашем коде, уже и не помню..., в любом случае спасибо, хоть мозгами своими благодаря ВАС дошла, что тоже приятно
Оляя вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
С++ Простая задача bgwqa Помощь студентам 1 17.12.2013 18:26
Простая задача Abuhamed Visual C++ 0 18.06.2013 00:40
Простая задача Arsenx777 Помощь студентам 1 04.03.2012 11:18
С++ (простая задача) slim>>> Помощь студентам 3 13.01.2010 20:13
Цикл for в С++ - простая математическая задача Blondy Помощь студентам 4 21.09.2009 19:47