Вопрос по информатике:
В линейном массиве вещественных чисел а (n) заменить все элементы большие 10. на число с.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 02.02.2015 13:01
- Информатика
- remove_red_eye 13981
- thumb_up 41
Ответы и объяснения 1
Const
k = 20;
var
a: array[1..k] of integer;
c, i, n: integer;
begin
Randomize;
write('Введите число элементов массива (не более 20): ');
readln(n);
write('Введите целое число С: ');
readln(c);
write('Исходный массив: ');
for i := 1 to n do
begin
a[i] := Random(41) - 20;
write(a[i], ' ')
end;
write(#13#10,'Массив-результат: ');
for i := 1 to n do
begin
if a[i] > 10 then a[i] := c;
write(a[i], ' ')
end
end.
Тестовое решение:
Введите число элементов массива (не более 20): 18
Введите целое число С: 99
Исходный массив: -1 -17 -15 16 12 -12 14 19 -1 18 13 11 -17 -6 -17 -2 20 -14
Массив-результат: -1 -17 -15 99 99 -12 99 99 -1 99 99 99 -17 -6 -17 -2 99 -14
- 03.02.2015 16:08
- thumb_up 33
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.