arthur16
Опубликовано 6 лет назад по предмету Информатика от arthur16


Дан массив d(n).Заменить элементы массива кратные 3 на их удвоеное произведение.

  1. Ответ
    Ответ дан ali07

    program xxx;

      var i, n : integer

               d : array[1..30] of real;

    begin

      write ('введите разметность массива n=');

      readln(n);

      writeln(''введите элементы массива d:');

      for i:=1 to n do

         readln(d[i]);

      writeln ('исходный массив D:');

      for i:=1 to n do

        write(d[i]);

      for i:=1 to n do

        if d[i] mod 3 = 0 then d[i]:= 2 * d[i];

      writeln ('полученный массив D:');

      for i:=1 to n do

        write(d[i]);

      readln

    end.

Не тот ответ, который вам нужен?
Найди нужный
Самые новые вопросы
99335871
Другие предметы - 9 месяцев назад

В какой оболочке земли живёт большинство живых организмов?

99335871
Другие предметы - 9 месяцев назад

Из каких неживых частей состоит экосистема

mandrykin
Другие предметы - 9 месяцев назад

На какие расы делятся население земли

kinda2007
Другие предметы - 9 месяцев назад

Определение статуса военнослужащего (краткий ответ!!)

Санёк1999
Другие предметы - 9 месяцев назад

Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Задай вопрос

Лучшие за месяц


Интересные статьи:


Пошаговый план подготовки к ЕГЭ за полгода для школьников
Не сдал ЕГЭ пересдача апелляция альтернативные пути
10 ошибок на ЕГЭ по русскому и способы их избежать
Выбор предметов ЕГЭ для поступления
Секреты подготовки к экзаменам дома от отличников