Информатика | 5 - 9 классы
Написать программу, которая обеспечивает ввод последовательности чисел.
Количество чисел в последовательности неизвестно.
Программа должна находить количество чисел, которое кратно 3 и заканчивается на 6.
Напишите программу, которая в последовательности натуральных чисел вычисляет сумму всех чисел кратных 7 и оканчивающихся на 0?
Напишите программу, которая в последовательности натуральных чисел вычисляет сумму всех чисел кратных 7 и оканчивающихся на 0.
Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность), Количество чисел не превышает 1000.
Введенные числа не превышают 30000.
Программа должна вывести одно число : сумму всех чисел, кратных 7 и оканчивающихся на 0.
Программу надо написать в Pascal.
Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 4 и оканчивающихся на 0?
Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 4 и оканчивающихся на 0.
Программа получает на вход целые числа, количество введеных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не является членом последовательности).
Количество чисел не превышает 1000.
Введеные числа по модулю не превышают 30000.
Программа должна вывести число : количество чисел, кратных 4 и оканчивающихся на 0.
Помогите написать программу на Паскале?
Помогите написать программу на Паскале.
Напишите программу, которая в последовательности целых чисел вычисляет сумму всех чисел, которые кратны 6 или 11.
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000.
Введённые числа по модулю не превышают 30 000.
Программа должна вывести одно число : сумму всех чисел, которые кратны 6 или 11.
Помогите написать программу на Паскале?
Помогите написать программу на Паскале.
Напишите программу, которая в последовательности целых чисел вычисляет сумму всех чисел, которые кратны 6 или 11.
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000.
Введённые числа по модулю не превышают 30 000.
Программа должна вывести одно число : сумму всех чисел, которые кратны 6 или 11.
Напишите программу, которая в последовательности натуральных чисел определяет сумму всех четных чисел чисел и количество нечетных?
Напишите программу, которая в последовательности натуральных чисел определяет сумму всех четных чисел чисел и количество нечетных.
Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Напишите программу, которая в последовательности целых чисел находит среднее арифметическое чисел, кратных 9, или сообщает, что таких чисел нет?
Напишите программу, которая в последовательности целых чисел находит среднее арифметическое чисел, кратных 9, или сообщает, что таких чисел нет.
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности).
Количество чисел не превышает 100.
Введённые числа по модулю не превышают 300.
Программа должна вывести среднее арифметическое чисел, кратных 9, или вывести NO, если таких чисел в последовательности нет.
Напишите программу, которая в последовательности натуральных чисел определяет количество трёхзначных чисел, кратных 4?
Напишите программу, которая в последовательности натуральных чисел определяет количество трёхзначных чисел, кратных 4.
Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000.
Введённые числа не превышают 30 000.
Программа должна вывести одно число : количество трёхзначных чисел, кратных 4.
Напишите программу в паскале пожайлуста.
Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 4 и оканчивающихся на 0?
Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 4 и оканчивающихся на 0.
Программа получает на вход целые числа, количество введеных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не является членом последовательности).
Количество чисел не превышает 1000.
Введеные числа по модулю не превышают 30000.
Программа должна вывести число : количество чисел, кратных 4 и оканчивающихся на 0.
Напишите программу, которая вводит последовательность целых чисел заканчивающихся нулем, и определяет количество четных положительных чисел в этой последовательности?
Напишите программу, которая вводит последовательность целых чисел заканчивающихся нулем, и определяет количество четных положительных чисел в этой последовательности.
Написать программу, которая обеспечивает ввод последовательности чисел?
Написать программу, которая обеспечивает ввод последовательности чисел.
Количество чисел в последовательности неизвестно.
Признаком конца последовательности является ввод 0.
Программа должна определять количество чисел, которые оканчиваются на 2 или 6.
Вопрос Написать программу, которая обеспечивает ввод последовательности чисел?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 5 - 9 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.
Program n1 ;
var a, k : integer ;
begin
readln(a) ;
k : = 0 ;
while a0 do
begin
if (a mod 3 = 0) and (a mod 10 = 6) then
k : = k + 1 ;
readln(a) ;
end ;
write(k) ;
end.