Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10, затем элементы с чётными индексами удваивает, а элементы с нечётными индексами утраивает. выведите на экран исходный и полученный массивы.

225

404

Посмотреть ответы 2

Ответы на вопрос:

анонім2281104

Информатика

4,4(85 оценок)

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

i: integer;

begin

randomize;

for i: =1 to 10 do a[i]: =random(1,10);

for i: =1 to 10 do write(a[i],' ');

writeln;

for i: =1 to 10 do if(i mod 2 = 0) then a[i]: =a[i]*2 else a[i]: =a[i]*3;

for i: =1 to 10 do write(a[i],' ');

end.

IamHelp999

Информатика

4,6(17 оценок)

В основном это зависит от активности паблика и количества рекламы в нём. Тут точную цифру сказать нельзя, но если паблик действительно популярен, постов должно быть много и они должны быть уникальны, много рекламы, то примерно от 5к рублей в месяц к 10к