Вопрос по информатике:
Создать и вывести массив У(8), с элементами уk = ln(k) - 3k, где k = 1,2…. Выполнить дополнительно задание своего варианта поиска данных по некоторому критерию (признаку). Найти в массиве отрицательные элементы и заменить их значение на модуль числа. Определить их количество .
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 20.02.2016 07:07
- Информатика
- remove_red_eye 6485
- thumb_up 39
Ответы и объяснения 1
Var
y:array[1..8]of real;
k,n:integer;
begin
writeln('Исходный массив:');
for k:=1 to 8 do
begin
y[k]:=ln(k)-3*k;
if y[k]<0 then n:=n+1;
write(y[k],' ');
end;
writeln;
writeln('Количество отрицательных: ',n);
writeln('Измененный массив: ');
for k:=1 to 8 do
begin
if y[k]<0 then y[k]:=abs(y[k]);
write(y[k],' ');
end;
end.
- 21.02.2016 22:27
- thumb_up 8
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.