Вопрос по информатике:
ОООЧЕНЬ НУЖНА ПОМОЩЬ! НУЖНО НАПИСАТЬ ПРОГРАММЫ (ХОТЯ БЫ ДВЕ,ПОЖАЛУЙСТА) В ПАСКАЛЕ ABC!
1. Дан массив. Все элементы уменьшить на число a.
2. Дан массив целых чисел. Верно ли,что сумма элементов массива есть четное число.
3. В массиве хранятся сведения о количестве осадков,выпавших за каждый день января. Определить общеее количество осадков за месяц и среднее количество за день.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 13.03.2015 09:00
- Информатика
- remove_red_eye 17482
- thumb_up 38
Ответы и объяснения 1
2. Найти сумму чисел массива в переменной Sum, а потом:
Writeln('Сумма элементов массива чётное число = ', not odd(Sum));
1.
var m:array[1..100]ofinteger; i,a,n:integer; beginwrite('Введите размерность массива: ');readln(n); write('Введите число А: ');readln(a); writeln('Введите массив: '); for i:=1to N doreadln(m[i]); writeln('Массив: '); for i:=1to N do M[i]:=m[i]-a; for i:=1to N dowrite(M[i],' '); end.- 14.03.2015 15:38
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.