На этом форуме отвечают на конкретные вопросы. Фраза «я не понимаю, как решать» — это не вопрос. На вопрос «как решить задачу №X» вас отошлют к материалам сайта kpolyakov.spb.ru. За бессвязный поток слов и неспособность формулировать свои мысли — бан.

Если у вас не сходится ответ на какую-то задачу, пожалуйста сразу представляйте свое «правильное» решение.
Программы "заворачивайте" в тэг [pre2]...[/pre2], при этом сохраняются все отступы и применяется моноширинный шрифт. Если у вас используется сочетание "[i]" для обозначения элемента массива или строки, ставьте пробел после открывающей скобки. Иначе система выделит все дальнейшее курсивом.

Для регистрации на форуме щелкните по ссылке «Вход-регистрация» вверху страницы. В открывшееся окошко «ник» введите свою фамилию на русском языке (например, Иванов). В окошко «пароль» введите придуманный вами пароль, состоящий из латинских букв и цифр. Поставьте галочку в окошке «зарегистрироваться, я новый участник» и нажмите кнопку «ОК».

АвторСообщение



Не зарегистрирован
ссылка на сообщение  Отправлено: 13.10.21 13:28. Заголовок: Задание 17 задача 151


Текст задания:
151) (В. Шубинкин) В файле 17-1.txt содержится последовательность целых чисел. Элементы последовательности могут принимать целые значения от -10 000 до 10 000 включительно. Определите и запишите в ответе сначала количество пар элементов последовательности, в которых хотя бы одно число оканчивается на 6 и делится на 3. Затем - минимальное число в паре среди всех таких пар. В данной задаче под парой подразумевается два идущих подряд элемента последовательности. Например, для последовательности 306; 36; -15; -6; 2; 16 ответом будет пара чисел: 4 и -15.

Моё решение:
f=open("17-1.txt")
A=[]
while True:
s=f.readline()
if not s: break
A.append(int(s))
l=len(A)
k=0
minch=10000
for i in range (1,l):
if (A%10==6 and A%3==0) or (A[i-1]%10==6 and A[i-1]%3==0):
k+=1
if minch> min(A,A[i-1]):
minch=min(A,A[i-1])
print (k, minch)
f.close()

Мой ответ: 606 -9984
Ответ автора: 587 -9996

Помогите, пожалуйста, найти ошибку.

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 5 [только новые]







Сообщение: 481
ссылка на сообщение  Отправлено: 13.10.21 13:48. Заголовок: abs(a)%10 == 6 abs(a..


abs(a[ i ])%10 == 6
abs(a[ i-1 ])%10 == 6


Discussio mater veritas est Спасибо: 0 
ПрофильЦитата Ответить



Сообщение: 2
ссылка на сообщение  Отправлено: 17.10.21 08:13. Заголовок: Прога на питоне тоже..


Прога на питоне тоже дает ответ 606 -9984
 f = open ('17-1.txt') 
n=0
m=20000
a = [int(x) for x in f.readlines()]
for i in range(len(a)-1):
if (a[ i]%3==0 and abs(a[ i]%10==6)) or (a[i+1]%3==0 and abs(a[i+1]%10==6)):
n+=1
m=min(m,a[ i],a[i+1])
print(n,m)


Спасибо: 0 
ПрофильЦитата Ответить



Сообщение: 3
ссылка на сообщение  Отправлено: 17.10.21 08:18. Заголовок: все поправил. Скобки..


все поправил. Скобки не там поставил

Спасибо: 0 
ПрофильЦитата Ответить



Не зарегистрирован
ссылка на сообщение  Отправлено: 31.10.21 20:45. Заголовок: Помогите пожалуйста


А что именно вы исправили? просто у меня всеравно выводит то же, что и у вас.

Спасибо: 0 
Цитата Ответить





Сообщение: 3
ссылка на сообщение  Отправлено: 01.11.21 11:16. Заголовок: :sm36: :sm36: :sm3..



###
var v := ReadAllText('17-1.txt').ToIntegers
.Pairwise.Wh(\(q,w)-> ((abs(q) mod 10 = 6)and q.d(3))or(w.d(3)and(abs(w) mod 10 = 6)));
print(v.Count,v.Min(\(q,w)-> q),v.Min(\(q,w)-> w))

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 5118
Права: смайлы да, картинки да, шрифты нет, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет