#include <iostream>
using namespace std;
int main()
{
int n, a, c;
cout << "Количество чисел: ";
cin >> n;
c = 0;
for (int i = 0; i < n; i++) {
cout << endl << ">>> ";
cin >> a;
if (a % 9 == 0) c++;
}
cout << endl << "Ответ: " << c << endl;
return 0;
}
Квадрат-зеленый, Круг-синий, Ромб-белый, Треугольник красного. Недавно решали по информатике.
Не совсем красиво но без массивов
var cur_num, prev_num: integer;
Begin
Writeln('Введите последовательность закончив ее нулем');
read(prev_num);
repeat
read(cur_num);
if cur_num * prev_num > 0 then
writeln('Пара = ', cur_num * prev_num);
prev_num := cur_num;
until cur_num = 0;
End.
Понедельник 1-5
вторник 2-6
среда 3-7
четверг 4-6
пятница 5-5