очень нужна Программа на Pascal
arsenenkodiana6
1
27.03.2020 21:16
1
Другие вопросы по теме Информатика
dilnaz61
30.07.2019 10:20
Sveta11111111Love
30.07.2019 10:20
кристина2155
30.07.2019 10:20
prizrak6571
19.11.2020 17:28
Uzdenova2005jam
19.11.2020 17:30
NHatynceva
05.02.2021 11:59
ksushadream1
05.02.2021 12:00
AlviaSil
21.01.2021 14:02
марго170
21.01.2021 14:03
Популярные вопросы
- Аударыспақ ойыны қалай ойналады? Асық ойыны қалай ойнайды? Алтыбақан ойыны...
3 - 1. Укажите правильный ответ. Деятельность форекс-дилера: а) можно совмещать...
3 - Треугольник МКА=ДОВ, КА=6см,МА=12см,угол К=76 градусамНайти: ОВ, ДБ, угол О...
3 - Выполнить синтаксический разбор предложений. В тарктире знали Герасима и понимали...
1 - Без его посредства немыслимо ни на шаг двинуть вперед науку, технику, ремёсла,...
3 - Міні твір: мої враження від прочитаного вірша ,,До побачення хлопчики...
2 - Твір-роздум «Національні традиції у творах Ч. Діккенса та М. Гоголя» (13-17...
2 - 1. Машина в течение 30 мин двигалась со скоростью 60 км/ч и 4 мин...
3 - Составить кросворд из 5 слов Международные отношения в XVI – XVIII вв. ДАЮ...
1 - Два одинаковых по массе поезда притягиваются друг к другу с силой 400 Н, находясь...
1
var
a:array of integer;
i,n,c:integer;
begin
readln(n);
setlength(a,n);
n:=n-1;
for i:=0 to n do
read(a[i]);
writeln;
c:=a[n];
for i:=n-1 downto 0 do
a[i+1]:=a[i];
a[0]:=c;
for i:=0 to n do
write(a[i]:2);
end.