Заполните массив A первыми N натуральными числами, начиная с X (ввести X с клавиатуры) в обратном порядке (начиная с конца массива). Написать программу

olgailinsk olgailinsk    1   23.11.2021 14:27    6

Ответы
vb8515401 vb8515401  23.11.2021 14:30

program qq;

var a:array[0..100] of integer;

i,x, n: integer;

begin

write('Введите значения x,n : ');

readln(x,n);

for i:=0 to n do begin

a[i]:=x+i; write(a[i],' ');

end;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика