OlesyaK2 / lesson13.py
Напишите программу, которая выводит часть последовательности 1 2 2 3 3 3 4 4 4 4 5 5 5 5 5 . (число повторяется столько раз, чему равно). На вход программе передаётся положительное целое число n — столько элементов последовательности должна отобразить программа. На выходе ожидается последовательность чисел, записанных через пробел в одну строк…
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters. Learn more about bidirectional Unicode characters
| a = int ( input ()) |
| m = [] |
| for i in range ( a ): |
| j = 0 |
| while j < i + 1 : |
| m . append ( i + 1 ) |
| j += 1 |
| if len ( m ) > a : break |
| m = m [ 0 : a ] |
| for i in m : |
| print ( i , end = » » ) |
Напишите программу, которая в последовательности целых чисел определяет количество четных чисел, кратных 3

Рабочая тетрадь по Информатике 9 класс Босова
Задание 197. Напишите программу, которая в последовательности целых чисел определяет количество четных чисел, кратных 3. Программа получает на вход целые числа. Количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0. Количество чисел не превышает 1000. Введенные числа по модулю не превышают 30000. Программа должна вывести одно число: количество четных чисел, кратных 3.
Program Zadacha197;
uses crt;
var i, k, a:integer;
BEGIN
writeln(‘Введите а’);
readln(a);
i := 0;
k := 1;
while (a<>0) and (k 0) and (k of your page —>
- Правообладателям
- Карта сайта
Последовательность целых чисел, оканчивающаяся нулем [закрыт]
Учебные задания допустимы в качестве вопросов только при условии, что вы пытались решить их самостоятельно перед тем, как задать вопрос. Пожалуйста, отредактируйте вопрос и укажите, что именно вызвало у вас трудности при решении задачи. Например, приведите код, который вы написали, пытаясь решить задачу
Закрыт 2 года назад .
- Дана непустая последовательность целых чисел, оканчивающаяся нулем.
- сумму всех чисел последовательности;
- количество всех чисел последовательности.
Решить задачу используя циклическую конструкцию for.
- Дано целое число N (> 1).
- наибольшее целое число K, при котором выполняется неравенство 2^K > N.
Решить задачу используя циклическую конструкцию while.
Вводится последовательность целых чисел, оканчивающихся 0

Вводится последовательность целых чисел, оканчивающихся 0 ( само число 0 в последовательности не входит, а служит признаком её окончания). Требуется решить 2 способами, задать последовательность через цикл или через список:
1) найти наибольшее трёхзначное значение последовательности;
2)найти, сколько элементов последовательности больше предыдущего.
| Здесь вы можете заказать любую студенческую или школьную работу. |
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
Ответы с готовыми решениями:
Вводится последовательность ненулевых целых чисел
Прошу срочно помочьна питоне Вводится последовательность ненулевых целых чисел, 0 – конец.

Вводится последовательность целых чисел, 0 – конец последовательности
Вводится последовательность целых чисел, 0 – конец последовательности. Вычислить количество.

Вводится последовательность из N целых чисел. Определить наибольшее число среди кратных 11
Вводится последовательность из N целых чисел. Определить наибольшее число среди кратных 11. Все.
Вводится последовательность из N целых положительных элементов
Вводится последовательность из N целых положительных элементов. Для простых элементов.
Регистрация: 29.04.2021
Сообщений: 2
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
# с использованием цикла Mx = 0 a = int(input()) h_a = a kol = 0 while a != 0: kol += 1 if a > h_a else 0 h_a = a if Mx a: Mx = a a = int(input()) print(Mx) print(kol) # с использованием списка lst = [] kol = 0 while True: b = int(input()) kol += 1 if len(lst) != 0 and b > lst[-1] else 0 if b == 0: break else: lst.append(b) print(max(lst)) print(kol)
![]()
![]()
35849 / 20105 / 4193
Регистрация: 12.02.2012
Сообщений: 33,290
Записей в блоге: 13
Enic2004, и где условие «наибольшее трёхзначное значение» ?
Регистрация: 29.04.2021
Сообщений: 2
Да забыл
Тогда просто можно добавить ещё одно условие
if Mx a and len(a) == 3: Mx = a
Автоматизируй это!
![]()
7097 / 4601 / 1213
Регистрация: 30.03.2015
Сообщений: 13,211
Записей в блоге: 29
Enic2004, можно переменные назвать еще непонятнее? например хорошо подойдут l I o O
Добавлено через 3 минуты
Enic2004, а если вводить только отрицательные числа? тогда максимум будет 0, а его в последовательности нет
Добавлено через 50 секунд
Сообщение от Enic2004 