• Дан массив целых чисел a(n) (n=15) заполненный случайным образом числами из промежутка [-20,50] . Заменить нулем четные по значению элементы данного массива

Ответы 3

  • а как мне это в abc pascal записать ? много непонятного
    • Автор:

      puppyeyi7
    • 6 лет назад
    • 0
  • #яп - pythonimport randoma = []#массив с которым работаемfor e in range(15):#заполняем массив случайнми числами из промежутка    a += [random.randint(-20, 50)]for e in range( len(a) ):#заменяем четные числа на нули     if a[e] % 2 == 0: a[e] = 0print a
  • program qq;const n=15;var a:array[1..n] of Integer;i:Integer;beginfor i:=1 to n do begin                       a[i]:=random(70-20);                       write(a[i]:4);                      end;writeln;for i:=1 to n do begin                       if a[i] mod 2 = 0 then a[i]:=0;                       write(a[i]:4);                      end;end.
  • Добавить свой ответ

Войти через Google

или

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

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

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