Скачать: CL | DM;

Завтра зачет по Delphi help pleazzzzzzz.Водиться ряд целых чисел.   Найти похожие ветки 

← →
space lord   (2002-06-05 00:19) [0]

Водиться ряд целых чисел. Найти сумму тех из них которые явл четными

---

← →
Kettle of delphi   (2002-06-05 00:25) [1]

Четные - это такие, которые делятся на 2 без остатка (т.е. остаток равен нулю). Остаток от деления можно посмотреть с помощью функции mod, которая возвращает остаток целочисленного деления. Короче, обозначим каждое введенное число Х. Искомую сумму обозначим переменной S. Если mod(X/2) = 0 то S := S+X.

---

← →
Новеньки в Делфи   (2002-06-05 01:34) [2]

тебе код нужен или теория?
если код, то более конкретно задание опиши. (каким образом числа вводиться будут нужны проверки, какие нить огрничения? и т.д.)

---

← →
MBo ©   (2002-06-05 06:43) [3]

Не описано, как вводятся данные. Если сформирован массив, то

Sum:=0;
for i:=1 to Num do
if not Odd(a[i]) then
Sum:=Sum+a[i];

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c