|
|
вернуться в форумHELP!!! Paskal var a,b,c,d:integer; begin Read(a,b,c,d); While a<>c do begin a:=a+b; c:=c-d end; a:=c; WriteLn(a); end. Почемууу(( Why((( Re: HELP!!! Paskal Карочь хрень полная Поможете?? Help me? Edited by author 25.03.2016 14:04 Re: HELP!!! Paskal Have you tried to run your program on task sample locally, using debugger? Or at least print A and C values at the end of each cycle iteration? Why no? You should try. Edited by author 25.03.2016 15:29 Re: HELP!!! Paskal Refer the example. I'm just a novice programmer. I try very hard. Help. I don't understand. ( YANDEX translator) Re: HELP!!! Paskal "Refer the example" И чо? "Я отладила программу на примере, пытаюсь сдать acm, получаю WA. Почему?"? "При локальном запуске, на примере, получаю неправильный ответ/программа зависает. Почему?"? "Что такое debugger?"? В общем, телепаты в отпуске. P.S. Посмотрел попытки на acm.timus.ru. Все TLE 1. Патамушта цЫкл While a<>c do begin a:=a+b; c:=c-d end; бесконечный, как и ожидается. Edited by author 26.03.2016 03:04 Re: HELP!!! Paskal Ну да :D Бывает. А ты на янде переводил? Re: HELP!!! Paskal Особенно это выдал яндекс Патамушта цЫкл Re: HELP!!! Paskal Послано MEOW 10 июн 2017 17:58 Они никогда не будут равны, если не состыкуются. Возьмем данные 150 50 1000 100 200(+50) 900 (-100) 250 800 300 700 350 600 400 500 450 400!!!! Edited by author 10.06.2017 17:58 |
|
|