#include <iostream> //подключаем библиотеку iostream
using namespace std;
int main()
{
int a, s; //объявляем целочисленные переменные a и s
cin >> a; //вводим a
s = 0; //обнуляем сумму
while (a != 0) //цикл while, условие - a не равно нулю
{
s = s + a % 10; //остаток от деления числа на 10 - его последняя цифра, прибавляем ее к сумме
a = a / 10; // убираем последнюю цифру
}
if (s % 2 == 0) //условие - проверка на четность
{
cout << "summa chetnaya"; //выводим когда сумма четная
}
else
{
cout << "summa nechetnaya"; //выводим когда сумма нечетная
}
return 0;
}
===== PascalABC.NET =====
begin
// 1
var a := MatrRandom(5, 5, -99, 99);
a.Println.ElementsByRow.Where(k -> k.IsEven).Sum.Println;
Writeln; // только чтобы отделить задачу
// 2
a := MatrRandom(10, 10, -99, 99);
a.Println.ElementsByRow.Where(k -> k mod 3 = 0).Count.Println;
Writeln; // только чтобы отделить задачу
// 3
a := MatrRandom(7, 4, -99, 99);
a.Println.ElementsByRow.Average.Print
end.
Примечание:
Оформление отдельной задачей делать так:
begin
var a := MatrRandom(7, 4, -99, 99); // создание и заполнение
a.Println.ElementsByRow.Average.Print // решение и вывод
end.