Регистрация
yanarem1
17.07.2021 19:53
Информатика
Есть ответ 👍

Составить программу, проверяющую есть ли цифра n в числе , введённом с клавиатуры. pascal abc. (не копируйте с других источников, неправильно)

122
231
Посмотреть ответы 3

Ответы на вопрос:

Артём244
Артём244
4,4(13 оценок)
Program n1; var a,n: integer; f: byte; begin f: =0; readln(a,n); while a< > 0 do begin if a mod 10=n then f: =1; a: =a div 10; end; if f=1 then write('цифра ',n,' присутствует в числе')  else write('в числе нет цифры ',n); end.
пантера49
пантера49
4,7(98 оценок)
Мне нужно вам что то написать так как нужно написать не менее 20 символов)
шпион223709
шпион223709
4,4(35 оценок)

n = int(input("input n: "))

numbers = input("input numbers: ").split()

print(numbers)

sum = 0

ans = int(numbers[0]);

left = 0

right = 0

pos = -1

for i in range(n):

sum += int(numbers[i])

if sum > ans:

ans = sum

right = i

left = pos + 1

if sum < 0:

sum = 0

pos = i

print("left: " + str(left + 1), " right: " + str(right + 1))

print("answer: " + str(ans));

Популярно: Информатика