• Составьте программу для решения 2 задачи пожалуйста по теме преобразование массивов.

    1. Сформировать массив из 8 случайных целых чисел от -20 до 20. Вывести сформированный массив на экран. Заменить кратные 5 элементы числом 100, а положительные числом -100. Вывести полученный массив на экран.
    2. Дан Массив из N целых положительных чисел. Заменить все чётные элементы массива числом 2, а не чётные - числом 1.

Ответы 4

  • " writeln; readln; //Если PascalABC.NET, можно убрать" - а что, во Free Pascal, Lazarus, Delphi... это надо писать?
    • Автор:

      ranger37
    • 5 лет назад
    • 0
  • Лучше написать // для Turbo/Borland Pascal
    • Автор:

      cashchgr
    • 5 лет назад
    • 0
  • В Delphi надо.
  • В консольной только. Но у Вас в программе нет для Дельфи директивы $APPTYPE
    • Автор:

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

Войти через Google

или

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

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

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