Дан одномерный массив m из 10 элементов, сдвинуть его элементы на три позиции. pascla

160

260

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

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

Boris2006

Информатика

4,6(74 оценок)

Const n = 10; var a: array [1..n] of longint; i,d,j: longint; begin for i: =1 to n do read(a[i]); for j: =1 to 3 do begin d: =a[n]; for i: =n downto 2 do a[i] : = a[i-1]; a[1]: =d; end; writeln('после сдвига: '); for i: =1 to n do write(a[i],' '); writeln; end.

vmse90

Информатика

4,8(18 оценок)

// pascalabc.net 3.3, сборка 1590 от 03.12.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(35,-99,99); a.println; // индексы от нуля! writeln('s=',a.where((v,i)-> i.iseven and v.isodd).sum) end. пример -71 65 -4 -59 -76 -8 -63 43 78 84 6 -59 26 -95 -80 99 67 11 -48 -35 38 -86 78 48 91 -91 78 2 96 83 25 2 -62 45 82 s=49