Не знаю почему не работает
Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 5 или 9. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести одно число: количество чисел, кратных 5 или 9. Sample Input: 1 5 9 0 Sample Output: 2
s = -1 d = 0 while s == 0: s = int(input()) if s % 5 == 0 or s % 9 == 0: d = d + 1 print(d)
Отслеживать
49k 17 17 золотых знаков 56 56 серебряных знаков 100 100 бронзовых знаков
OlesyaK2 / lesson13.py
Save OlesyaK2/12eac97f030b210fc33f to your computer and use it in GitHub Desktop.
Напишите программу, которая выводит часть последовательности 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 —>
- Правообладателям
- Карта сайта
Последовательность целых чисел, оканчивающаяся нулем [закрыт]
Учебные задания допустимы в качестве вопросов только при условии, что вы пытались решить их самостоятельно перед тем, как задать вопрос. Пожалуйста, отредактируйте вопрос и укажите, что именно вызвало у вас трудности при решении задачи. Например, приведите код, который вы написали, пытаясь решить задачу
Закрыт 3 года назад .
- Дана непустая последовательность целых чисел, оканчивающаяся нулем.
- сумму всех чисел последовательности;
- количество всех чисел последовательности.
Решить задачу используя циклическую конструкцию for.
- Дано целое число N (> 1).
- наибольшее целое число K, при котором выполняется неравенство 2^K > N.
Решить задачу используя циклическую конструкцию while.