• написать програамму в паскале( и сделать блоксхему). Дан массив V размером 25, увеличить элемента массивы, которве больше 2 на 5. Найти max значение нового массива.

Ответы 8

  • А как насчет "и сделать блоксхему" ?
    • Автор:

      sydney69
    • 6 лет назад
    • 0
  • Нужно было добавить .ToArray
    • Автор:

      josh
    • 6 лет назад
    • 0
  • ясно , спасибо
    • Автор:

      gigi
    • 6 лет назад
    • 0
  • Еще раз: любые расширения для преобразования массива, если это особо не оговорено, стремятся превратить его в последовательность.
  • Это сделано в целях эффективности: последовательности не хранятся и их элементы никуда не копируются, поэтому в цепочках экономится и память, и время.
    • Автор:

      red6of2
    • 6 лет назад
    • 0
  • ок , спасибо !
    • Автор:

      octavio34
    • 6 лет назад
    • 0
  • var  V: array[1..25] of integer;  i, max: integer;beginrandomize;writeln('Исходный массив.');for i := 1 to 25 dobegin  V[i] := random(5);  write(V[i], ' ');end;max := V[1];writeln;writeln('Измененный массив.');for i := 1 to 25 dobegin  if V[i] > 2 then V[i] := V[i] + 5;  if V[i] > max then max := V[i];  write(V[i], ' ');end;writeln;writeln('max = ', max);end.
    answer img
  • //PascalABC.NET 3.3,сборка 1611 от 06.01.2018//Внимание! Если программа не работает, обновите версию!begin  var V:=ArrRandom(25,0,20); V.Println;  var mas:=V.Select(t-> t>2 ? t+5 : t).ToArray; mas.Println;  Writeln('max=',mas.Max);end.
    answer img
    • Автор:

      serrano
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years