profile
Опубликовано 5 лет назад по предмету Информатика от dannagib3

В массиве g(10) элементы,стоящие на нечетных позициях устроить,а на четных заменить их порядковым номером.ввод элемента массивом осуществить списком.Алгоритм на Паскаль

  1. Ответ
    Ответ дан porludom

    program pr;

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

    i,vvod:integer;

    begin

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

    for i:=1 to 10 do

    begin

    readln(vvod);

    if (i mod 2)=1 then

     g[i]:=(vvod*3)

     else

     g[i]:=i;

    end;

    writeln('Получившийся массив:');

    for i:=1 to 10 do writeln(g[i]);

    end.

Самые новые вопросы