В КуМире составить алгоритм: "Найти количество двузначных чисел делящихся на 3" с цикла для

#include <iostream>

using namespace std;

int main()

{

   int number, max_1, max_2;

   cin >> number;

   max_1 = number;

   while (number != 0)

   {

       cin >> number;

       if (number > max_1)

       {

           max_2 = max_1;

           max_1 = number;

       }

   }

   cout << max_1 << " " << max_2;

}

Объяснение:

Последовательность заканчивается нулём

#include <iostream> // Библиотека ввода - вывода

using namespace std; // Пространство имён

int main()

{

   int number, max_1, max_2; // Создание целочисленных переменных:

number - вводимые числа;max_1 - первый максимум;max_2 - второй максимум.

   cin >> number; // Ввод числа с клавиатуры

   max_1 = number; // Возьмём, что первый максимум = первому числу

   while (number != 0) // Пока значение переменной number ≠ 0

   {

       cin >> number; // Ввод числа с клавиатуры

       if (number > max_1) // Если значение переменной number > значения переменной max_1

       {

           max_2 = max_1; // Второй максимум = первый максимум

           max_1 = number; // Первый максимум = переменной number

       }

   }

   cout << max_1 << " " << max_2; // Вывод ответа через пробел

}

// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var n:=ReadInteger('Количество элементов в массиве: ');
  var a:=ArrRandom(n,-50,50);
  a.Println(',');
  Writeln('Четные элементы: ');
  var i:=1;
  while i<n do begin Write(a[i],' '); Inc(i,2) end;
  Writeln;
  Writeln('Нечетные элементы: ');
  i:=0;
  while i<n-1 do begin Write(a[i],' '); Inc(i,2) end;
  Writeln
end.

Тестовое решение:
Количество элементов в массиве:  10
15,-18,-29,-25,46,21,-8,-17,-9,15
Четные элементы:
-18 -25 21 -17 15
Нечетные элементы:
15 -29 46 -8 -9