Unsubscribe from irrelevant news
To unsubscribe from another user's news, click the settings icon in this post and select the necessary option.
Все
Guestbook
More
Александр Наумов
wrote
15 October 2014 at 9:57
с телефона
status.html
const N = 10; type arr = array[1..N] of integer; var a: arr; i,j: byte; q: integer; procedure shift(var m: arr; p: integer); var b: integer; begin if p < 0 then for j:=1 to abs(p) do begin b := m[1]; for i:=1 to N-1 do m[i] := m[i+1]; m[N] := b; end else for j:=1 to p do begin b := m[N]; for i:=N downto 2 do m[i] := m[i-1]; m[1] := b; end; end; begin for i:=1 to N do begin a[i] := i; write(a[i],' '); end; writeln; readln(q); shift(a,q); for i:=1 to N do write(a[i],' '); writeln; end.
Александр Наумов
subscribed to 2 groups
26 October 2013 at 3:30
community-join.html
Александр Наумов
subscribed to the group
21 October 2013 at 12:48
community-join.html
Александр Наумов
subscribed to the group
12 October 2013 at 19:35
community-join.html
Александр Наумов
subscribed to 2 groups
4 October 2013 at 11:38
community-join.html
Александр Наумов
subscribed to 2 groups
9 August 2013 at 15:45
community-join.html
Александр Наумов
installed a game
31 July 2012 at 12:11
app-install.html
Шахматы – любимая игра миллионов. Игра Шахматы появилась более 1500 лет назад. Играй в Шахматы, разыгрывай супер партии, продумывай интригующие стратегии, сделай свой ход конем!
445 930
Uploading
Error loading page. Retry in 15 seconds.
Error loading page. Retry in 5 seconds.
Error loading page. Retry in 5 seconds.
С Новым годом!
от
Команда проекта
Мой Мир
Other people named Александр Наумов in My World