Составить программу, которая вычисляет сумму вводимых с клавиатуры чисел , выбирая из них...

Question

Составить программу, которая вычисляет сумму вводимых с клавиатуры чисел , выбирая из них только двузначные чтные отрицательные числа ( с циклом for и while).

Comments

Помогиииитте пожалуйста

---

язык

---

я могу на питоне сделать, сойдет?

---

и на паскале, ток будет тяжело

Answer 1

Pascal
//--------------------------------------------

var
  a, sum: integer;
begin
sum := 0;
a := 1;
writeln('Вводите числа. 0 завершает ввод чисел');
while a <> 0 do
begin
  readln(a);
  if (a < -9) and (a > -100) and (a mod 2 = 0) then
    sum := sum + a;
end;
writeln('Сумма отрицательных двузначных четных элементов = ', sum);
end.

//---------------------------------------------------------------
Пример:
Вводите числа. 0 завершает ввод чисел
-5
-10
10
-99
-50
-20
55
44
0
Сумма отрицательных двузначных четных элементов = -80