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

Написать программу в паскале для 6 элементов, где каждый элемент увеличить в 2 раза

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

    Program n_1;

    uses math;

    var a:array [1..6] of integer; i: integer;

    begin

       for i:=1 to 6 do begin read (a[i]); a[i]:=a[i]*2; end;

       writeln;

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

    end.

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