Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];
Вниз
Завтра зачет по 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 вся ветка
Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c
