Вопрос по информатике:
Найти произведение элементов массива с(12) , имеющих значение в промежутке {5,3;40,7}
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 27.12.2017 21:35
- Информатика
- remove_red_eye 12436
- thumb_up 12
Ответы и объяснения 2
var
c: array [1..12] of real;
i: byte;
mult: real;
begin
randomize;
mult := 1;
for i := 1 to 12 do
begin
c[i] := random * 75;
if ((c[i] > 5.3) and (c[i] < 40.7)) then
mult := mult * c[i];
write(c[i]:7:2);
end;
writeln;
writeln('Произведение элементов от 5,3 до 40,7 = ', mult:10:2);
end.
- 28.12.2017 03:16
- thumb_up 7
//Версия 3.3, сборка 1611
begin
var c:=ArrRandomReal(12,-10,70).Println();
write(c.Where(x->(x>5.3) and (xx*y));
end.
- 29.12.2017 10:55
- thumb_up 12
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.