Задача

[Владан]

Сложить программу циклического сдвига елементов масива на 1 позицию влево ,елемент которий оттесняется , вставить на место которое освобождается

К.р , очень надеюсь на вашу помощь
заранее спасибо

[Serge_Bliznykov]

тоже мне бином Ньютона...

tmp := a[1];
for i:=1 to N-1 do
  a[i] := a[i+1];
a[n] := tmp;

[Владан]

Сообщение от Serge_Bliznykov

тоже мне бином Ньютона...

tmp := a[1];
for i:=1 to N-1 do
  a[i] := a[i+1];
a[n] := tmp;

спасибо , и єто все ?)

[Serge_Bliznykov]

точно. нужно для полноты вкуса добавить описание переменных, ввод (заполнение) массива, вывод (печать) полученного массива.

[Владан]

Сообщение от Serge_Bliznykov

точно. нужно для полноты вкуса добавить описание переменных, ввод (заполнение) массива, вывод (печать) полученного массива.

напиши плз
ато я плаваю

[domovou]

Сообщение от Владан

напиши плз
ато я плаваю

const
     n=15;
type
    mas=array [1..n] of integer;
var
   a:mas;
   i,tmp:integer;
BEGIN
writeln;
for i:=1 to N do
    begin
    a[i]:=random(30);
    write(a[i]:3);
    end;
writeln;
tmp := a[1];
for i:=1 to N-1 do
    a[i] := a[i+1];
a[n] := tmp;
for i:=1 to N do
    write(a[i]:3);
readln;
END.

[Владан]

Сообщение от domovou

const
     n=15;
type
    mas=array [1..n] of integer;
var
   a:mas;
   i,tmp:integer;
BEGIN
writeln;
for i:=1 to N do
    begin
    a[i]:=random(30);
    write(a[i]:3);
    end;
writeln;
tmp := a[1];
for i:=1 to N-1 do
    a[i] := a[i+1];
a[n] := tmp;
for i:=1 to N do
    write(a[i]:3);
readln;
END.

спасибо большое)
слух , а что такое tmp ?

[Leshii]

Переменная для временного хранения значения( значений ).

[Poma][a]

Временная переменная так же известная под именами t, temp.

[solovey.kurskiy]

Задача в турбо паскале. Даны два числа a и b , если они равны, то найти их сумму. Если не равны, то найти их произведение. Напишите решение

p.s. Информатика 9 класс.