Olga_Vyacheslavovich1054
?>

Дана последовательность натуральных чисел, завершающаяся число 0. определите наибольшую длину монотонного фрагмента последовательности (то есть такого фрагмента, где все элементы либо больше предыдущего, либо меньше числа, следующие за числом 0, считывать не нужно. входные данные дана последовательность натуральных чисел, завершающаяся число 0. выходные данные выведите ответ на . примеры входные данные 1 7 7 9 1 0 выходные данные 2 через 10 минут сдавать умоляю на питоне

Информатика

Ответы

gorushko-tabak3

program xxx; var i, j, k, n, p, s : integer;       a : array [1..20] of integer; begin  write ('введите количество инверсий -');   readln(k);   write ('введите количество ламп -');   readln(n);   for i: =1 to n do      a[i]: =0;   for i: =1 to k do      begin          write ('введите инверсию p-');           readln(p);           j: =p;           while j< =n do              begin                  if a[j]=0 then a[j]: =1 else a[j]: =0;                   j: =j+p              end      end;   s: =0;   for i: =1 to n do      if a[i]=1 then s: =s+1;   write ('ламп горит -', s);   readlnend.

pifpaf85

на python:

 

def countvowel(string):       countvowel = 0;       for i in string:               if  i == 'а' or i == 'е' or i == 'ё' or i == 'и' or i == 'о' or i == 'у' or i == 'ы' or i == 'э' or i == 'ю' or i == 'я':                     countvowel+=1      return countvowel            lst = ['кошка','кофе','телевизор','автомобиль']rang = range(len(lst))for i in rang:       lst[i] = countvowel(lst[i])print(lst)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дана последовательность натуральных чисел, завершающаяся число 0. определите наибольшую длину монотонного фрагмента последовательности (то есть такого фрагмента, где все элементы либо больше предыдущего, либо меньше числа, следующие за числом 0, считывать не нужно. входные данные дана последовательность натуральных чисел, завершающаяся число 0. выходные данные выведите ответ на . примеры входные данные 1 7 7 9 1 0 выходные данные 2 через 10 минут сдавать умоляю на питоне
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

sorokinae
Овсянкина407
Кононова-БЕСКРОВНАЯ
Chervonnaya-Aleksei
Бунеева
Чечин-Павлова615
Татьяна
shuramuji
vetviptime
oaved2018
Игорь Андрей
xalina85
Ivanovich_Kostik898
nv6634
yuda12