Вопрос по информатике:
Пожалуйста помогите, очень нужно.
Сформировать одномерный массив G из 10 элементов, где элементы массива G[i] - целые случайные числа в пределах [5; 40]. Найти количество элементов кратных 7 и вывести эти элементы массива.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 10.09.2016 08:19
- Информатика
- remove_red_eye 3175
- thumb_up 18
Ответы и объяснения 1
Program dasf;
var z,b,i: integer;
A: Array[1..100] of integer;
begin
b:=0;
For i:=1 to 100 do
begin
z:=random(36)+5;
A[i]:=z;
If z div 7=0 then b:=b+z;
Writeln(A[i]);
end;
Writeln('Сумма всех чисел массива, кратных 7: ',b);
end.
- 11.09.2016 21:55
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.