• 1. Сформировать массив из 10 целых чисел случайным образом из [20;100], на экран.
    2. Четные элементы заменить на число 3, а нечетные на -3, вывести на экран.
    3.Элементы, стоящие на четных местах 3, на нечетных -3, на экран.
    П.С я настолько глуп в информатике, что даже вопроса не понял. Помогите, люди добрые!​

Ответы 1

  • 1_2.

    const n=10;

    var a:array[1..n] of integer;

    i:integer;

    begin

    randomize;

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

    for i:=1 to n do

    begin

    a[i]:=random(81)+20;

    write(a[i],' ');

    end;

    writeln;

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

    for i:=1 to n do

    begin

    if a[i] mod 2=0 then a[i]:=3 else a[i]:=-3;

    write(a[i]:3);

    end;

    writeln;

    end.

    Пример:

    Исходный массив:

    49 25 50 90 82 20 71 25 57 45  

    Полученный массив:

    -3 -3  3  3  3  3 -3 -3 -3 -3

    1_3.

    const n=10;

    var a:array[1..n] of integer;

    i:integer;

    begin

    randomize;

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

    for i:=1 to n do

    begin

    a[i]:=random(81)+20;

    write(a[i],' ');

    end;

    writeln;

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

    for i:=1 to n do

    begin

    if i mod 2=0 then a[i]:=3 else a[i]:=-3;

    write(a[i]:3);

    end;

    writeln;

    end.

    Пример:

    Исходный массив:

    85 29 99 27 80 70 70 58 78 46  

    Полученный массив:

    -3  3 -3  3 -3  3 -3  3 -3  3

    • Автор:

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

Войти через Google

или

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

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

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