Question

Помогите пожалуйста написать эту программу с while! Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет ко­ли­че­ство чисел, крат­ных 3. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в последовательности, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, крат­ное 3. Ко­ли­че­ство чисел не пре­вы­ша­ет 100. Введённые числа не пре­вы­ша­ют 300. Про­грам­ма долж­на вы­ве­сти одно число — ко­ли­че­ство чисел, крат­ных 3.

Answer 1

Var n,k,m,p: integer;
begin
  write('n = ');  readln(n);
  k:=0; p:=0;
  while k<n do
  begin
    read(m);
    if m mod 3 = 0 then p:=p+1;
    k:=k+1;
  end;
  writeln('количество чисел, кратных 3: ',p);
end.

n = 6
10 -13 14 -15 21 23
количество чисел, кратных 3: 2

Answer 2

Конечно, вот пример программы на Python, которая решает эту задачу с использованием цикла while:

n = int(input("Введите количество чисел в последовательности: "))
count = 0
i = 0

while i < n:
    num = int(input("Введите число: "))
    if num % 3 == 0:
        count += 1
    i += 1

print("Количество чисел, кратных 3: ", count)

Эта программа сначала запрашивает у пользователя количество чисел в последовательности. Затем она использует цикл while для получения самих чисел и проверки, кратны ли они 3. Если число кратно 3, то счетчик увеличивается на 1. После прохождения всех чисел программа выводит количество чисел, кратных 3.