Вопрос по информатике:
Написать на языке паскаль. Масси из 14 элементов заполнить случайными целыми числами в интервале от -5 до 50. Вывести получкнный массив на экран в строчку. Найти сумму нечетных элементов массива
- 11.01.2018 06:53
- Информатика
- remove_red_eye 14779
- thumb_up 37
Ответы и объяснения 1
Program z;
var a: array [1..14] of integer;
i,sum: integer;
begin
sum:=0;
for i:=1 to 14 do
begin
a[i]:= random(50) -5; write(a[i]: 6);
if a[i] mod 2 0 then sum:= sum+a[i];
end;
write(' sum= ',sum);
end.
- 12.01.2018 21:49
- thumb_up 36
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.