0 / 0 / 0
Регистрация: 17.11.2011
Сообщений: 14
1

Определить минимальный элемент среди элементов, значение которых кратно пяти и не равно нулю

01.12.2011, 20:11. Показов 1985. Ответов 1
Метки нет (Все метки)

Ввести одномерный массив X(N) (N<=90). Определить минимальный элемент среди элементов, значение которых кратно пяти и не равно нулю. Разделить каждый элемент массива X на вычисленное значение и записать в создаваемый массив Y(N). Выдать на печать исходный и результирующий массивы или дать сообщение о невозможности создания нового массива.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.12.2011, 20:11
Ответы с готовыми решениями:

Определить минимальный элемент среди элементов, значение которых кратно пяти и не равно нулю
Ввести одномерный массив X(N). Определить минимальный элемент среди элементов, значение которых...

Выведите массив на экран и найдите количество элементов, значение которых равно нулю
&quot;Данный двухмерный массив размерностью 5X4. Заполните его случайными числами с интервала -20 .. 20:...

Выполнить путём сдвига вправо все биты, значение которых равно нулю и влево все биты, значение которых равно единице
Выполнить путём сдвига вправо все биты, значение которых равно нулю и влево все биты, значение...

Найти минимальный элемент среди положительных элементов, расположенных левее первого элемента, равного нулю
Пишет что нет нулевого, даже когда ввожу 0, и посмотрите другие ошибки. СРОЧНО НУЖНО!!! int...

1
trainspotting
1086 / 486 / 384
Регистрация: 11.11.2010
Сообщений: 773
01.12.2011, 20:43 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
const
  nmax=90;
type
  arr=array[1..nmax] of integer;
  arr_v=array[1..nmax] of real;
var
  x:arr;
  y:arr_v;
  i,n,x_min:integer;
begin
  randomize;
  repeat
    write('Razmer <= ',nmax,': ');
    readln(n);
  until n in [1..nmax];
  for i:=1 to n do
    begin
      x[i]:=random(30);
      write(x[i]:4);
    end;
  writeln;
  i:=1;
  while (x[i] mod 5<>0) or (x[i]=0) and (i<=n) do
    inc(i);
  if i>n then
    writeln('V massive net kratnyh 5 i odnovremenno <> 0 elementov. Ne sozdaem massiv.')
  else
    begin
      x_min:=i;
      for i:=x_min+1 to n do
        if (x[i] mod 5=0) and (x[i]<>0) and (x[i]<x[x_min]) then
          x_min:=i;
      for i:=1 to n do
        y[i]:=x[i]/x[x_min];
      writeln('Sformirovanniy massiv y:');
      for i:=1 to n do
        write(y[i]:5:1);
    end;   
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.12.2011, 20:43
Помогаю со студенческими работами здесь

Определить максимальный элемент массива, среди отрицательных, элементов кратных пяти
надо консольное приложение , без рандомайза функций и процедур в делфи.Прошу помогите)1 курс,завтра...

Определить, сколько среди данных чисел равно нулю
Определить, сколько среди данных чисел равно нулю. В условии задачи дана произвольная...

Для каждой строки матрицы определить минимальный элемент, среди которых найти максимальный
Задание: Дан двумерный массив из 5 строк и 6 столбцов. Определить для каждой строки минимальный...

Найти минимальный элемент среди элементов массива, порядковые номера которых кратны 4
Нужна помощь... Вот задача: Найти минимальный элемент среди элементов массива, порядковые номера...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru