Есть ответ 👍

Составьте алгоритм, где вводиться десять элементов массива, и каждый увеличивается на 3

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

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

Ychenik2525
4,7(38 оценок)

Var  mas: array [0..9] of integer; i,n: integer; begin n: =9; for i: =0 to n do  begin  mas[i]: =3*i;   write(mas[i],' ');   end; end.

ответ:

program findnum;

var

  n: integer;

begin

  n : = 10;

  while n < = 99 do begin

    if (n mod 2 = 0) and (n mod 3 = 0) then

      write (n, ' ');

    inc (n);

  end;

  readln;

end.

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