* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи.
(полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.
Вопрос № 148632: Ребята помогите пожалуйста, очень прошу вас на зачет пожалуйста помогите чем сможете решить задачку: "Задана последовательность из 10 чисел.Посчитать все четные числа последовательности". Пожалуйста помогите чем можете!!!!...
Вопрос № 148.632
Ребята помогите пожалуйста, очень прошу вас на зачет пожалуйста помогите чем сможете решить задачку: "Задана последовательность из 10 чисел.Посчитать все четные числа последовательности". Пожалуйста помогите чем можете!!!!
#thank 148632 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Отвечает: Абельхарисов Руслан/Marked One
Здравствуйте, Черепанов Алексей Витальевич! Сначало необходимо объявить последовательность:
Код:
const {Количество элементов в последовательности} N = 10; var {Сама последовательность} A: array
[1..N] of integer;
Так мы создали массив из N элементов с типом Integer, где N = 10.
Обработать массив(последовательность) можно с помощью цикла For:
Код:
{В цикле пе
ребираем массив(последовательность)} for i:=1 to N do begin {Присваиваем каждому элементу массива случайное число} a[i]:=random(100)-50; {Выводим его} Write(a[i], ' '); {С помощью функции Odd() проверяем на четность число} if not Odd(a[i]) then {Если число четное, то прибавляем к счетчику количества
1} inc(count); end;
Внутри цикла мы присваиваем элементу случайное число. Потом проверяем его четность. Функция Odd принимает в качестве аргумента целое число и возвращает true если число нечетное и false если число четное, поэтому перед вызовом функции мы поставили оператор not, чтобы возвращалось true для четного числа. Если условие выполнилось мы увеличиваем счетчик на 1 с помощью функции
inc, которая увеличивает на 1 число переданое ей. Надеюсь всё понятно объяснил. Полный код в приложении. Удачи!!!
#thank 148632 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценка за ответ: 5 Комментарий оценки: Спасибо вам большое за помощь!))
Отвечает: Genia007
Здравствуйте, Черепанов Алексей Витальевич! Могу предложить следующее решение задачи: На форме лежат: кнопка, memo, edit. Числа вводятся в memo по одному в строке
Приложение:
Ответ отправил: Genia007 (статус: 9-ый класс)
Ответ отправлен: 27.10.2008, 19:48
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 148632 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценка за ответ: 4 Комментарий оценки: Спасибо вам большое!
Скажите "спасибо" эксперту, который помог Вам!
Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
на короткий номер 1151 (Россия)
Номер ответа и конкретный текст СМС указан внизу каждого ответа.
* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи.
(полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.
