М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
mrsdyy
mrsdyy
04.05.2022 12:44 •  Информатика

Pascal Дана последовательность из N целых чисел и число K . Сдвинуть всю последовательность на K элементов вправо , если K - положительное и влево , если отрицательное

👇
Ответ:
Марине1960
Марине1960
04.05.2022

могу наверное написать на с++, а там на паскале похожее.

vector<int>a;

int n,k,s,x,i,s1,n1;

cin>>n>>k;

for(i=0;i<n;i++)

{

cin>>x;

a.push_back(x);

}

s=a[0];

if(k<0)

{

s1=s+k;

s1=s1+1;

for(i=0;i<n;i++)

{

s1=s1-1;

a[i]=s1;

}

else

{

s1= s+k;

s1 =s1-1;

for(i=0;i<n;i++)

{

s1=s1+1;

a[i]=s1;

}

}

вывести массив

Объяснение:

не уверен, что верно, мб дичь написал

4,6(72 оценок)
Открыть все ответы
Ответ:
arishaprohorenk
arishaprohorenk
04.05.2022

1.поименованная или иным образом идентифицированная часть компьютерной программы, содержащая описание определённого набора действий. Подпрограмма может быть многократно вызвана из разных частей программы. В языках программирования для оформления и использования подпрограмм существуют специальные синтаксические средства.

2. Локальные переменные делают возможной рекурсию. Переменные локальной области видимости используются, чтобы избежать проблем с побочными эффектами, которые могут произойти с глобальными переменными. Языки программирования, которые используют вызов по значению, выделяют каждой подпрограмме локальную область видимости из локальных переменных с локальной копией аргументов переданных ей.

3. program primer1; var a, n: integer; s:longint; procedure degree(x,y: integer; var st: longint); var i:integer; begin st :=1; For i:=1 to y do st:= st * x; end; begin {main} writeln('Введите два числа'); readln(a, n); degree(a,n,s); {Вызов процедуры} writeln('Результат: ', s); {Вывод результата} end.

4. При вызове процедуры с параметром она принимает передаваемые значения, а без параметров - она не может принимать значения. Глобальная переменная - это такая переменная, которая может быть использована во всей программе, в том числе в процедурах и в функциях.

4,8(9 оценок)
Ответ:
KALINACHKA
KALINACHKA
04.05.2022
Program N70231806_1;
var a:array[ 1 .. 10 ] of shortint;
i:byte;
t:shortint;
begin
randomize;
writeln('Исходный массив: ');
for i := 1 to 10 do
begin
a[ i ] := random(21) - 10;
write(a[ i ]:4)
end;
writeln;
t := a[ 10 ];
for i := 10 downto 2 do
a[ i ] := a[ i - 1 ];
a[ 1 ] := t;
writeln('Результат: ');
for i := 1 to 10 do
write(a[ i ]:4);
readln
end.

2)
program N70231806_2;
var a:array[ 1 .. 12 ] of shortint;
i, j:byte;
t:shortint;
begin
randomize;
writeln('Исходный массив: ');
for i := 1 to 12 do
begin
a[ i ] := random(25) - 10;
write(a[ i ]:4)
end;
writeln;
for j := 1 to 4 do
begin
t := a[ 12 ];
for i := 12 downto 2 do
a[ i ] := a[ i - 1 ];
a[ 1 ] := t
end;
writeln('Результат: ');
for i := 1 to 12 do
write(a[ i ]:4);
readln
end.
4,5(37 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ