• 
  • 03 November 2020
  Информатика
  • Автор: danilfrom2015p7dvsf

  

  Напишите программу, которая в последовательности натуральных чисел определяет
  количество чисел, кратных 4. Программа получает на вход количество чисел в
  последовательности, а затем сами числа. В последовательности всегда имеется число,
  кратное 4.
  Количество чисел не превышает 1000. Введѐнные числа не превышают
  30 000.
  Программа должна вывести одно число – количество чисел, кратных 4.
  Пример работы программы:
  Входные данные Выходные данные
  3
  16
  26
  24
  2

• 
  • 03 November 2020
  • Ответ оставил: restIess

  N = int(input("Сколько чисел в последовательности? "))

  k = 0

  for i in range(N):

     x = int(input())

     if x % 4 == 0:

         k+=1

  print(k)

  0
• 
  • 03 November 2020
  • Ответ оставил: uplmtq

  Ответ:

  program count4;

  var

   size, amount, counter, i: integer;

  begin

   counter := 0;

   amount := 0;

   readln(size);

   while counter < size do

   begin

     readln(i);

     if (i mod 4 = 0) then

       amount := amount + 1;

     counter := counter + 1;

   end;

   write(amount);

  end.

  Объяснение:

  program count4;  // Название программы

  var

   size, quantity, counter, i: integer;  // Создание целочисленных переменных

  • i - вводимые числа с клавиатуры;
  • size - количество чисел в последовательности;
  • quantity - количество чисел, кратных 4;
  • counter - переменная счетчик.

  begin  // Начало программы

   counter := 0;  // Переменная счетчик = 0

   quantity:= 0;  // Количество четырехзначных чисел = 0

   readln(size);  // Считываем количество чисел в последовательности с клавиатуры

   while counter < size do  // Пока значение переменной counter < значения переменной size

   begin  // Начало цикла

     readln(i);  // Считываем число с клавиатуры

     if (i mod 4 = 0) then  // Если остаток от деления = 0, тогда

       quantity:= amount + 1;  // Количество + 1

     counter := counter + 1;  // Переменная счетчик + 1

   end;  // Конец цикла

   write(quantity);  // Вывод значения переменной quantity

  end. // Конец программы

  0
• 
  • НЕ НАШЛИ ОТВЕТ?

  Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: информатика.
  На сегодняшний день (29.09.2024) наш сайт содержит 109574 вопросов, по теме: информатика. Возможно среди них вы найдете подходящий ответ на свой вопрос.

  Найти другие ответы
• Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

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

Последние опубликованные вопросы