Есть ответ 👍

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

225
383
Посмотреть ответы 3

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

maksi71
4,6(57 оценок)

begin

  var a : = arrrandom(10, 1, 10); a.println;

  for var i : = 0 to a.high do

    if i.isodd then a[i] *= 2

    else a[i] *= 3;

  a.println;

end.


const n=10;

var i: integer;

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

begin

for i: =1 to n do

begin

a[i]: =random(10)+1;

write(a[i]: 2,' ');

if i mod 2 = 0 then a[i]: =a[i]*2

else a[i]: =a[i]*3

end;

writeln;

for i: =1 to n do write(a[i]: 2,' ')

end.


Pascal c или c++ или c# python java basic delphi

Популярно: Информатика