В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
krskapoval
krskapoval
17.08.2020 03:30 •  Другие предметы

Назовите ряд национальных особенностей сбытовой деятельности в развитых странах с рыночной экономикой

Показать ответ
Ответ:
NastyKek4556
NastyKek4556
14.04.2021 10:49
Но вот наконец, когда солнце стало спускаться к западу, степь, холмы и воздух не выдержали гнета и истощивши терпение, измучившись, попытались сбросить с себя иго. Из-за холмов неожиданно показалось пепельно-седое кудрявое облако. Оно переглянулось со степью - я, мол, готово - и нахмурилось. Вдруг в стоячем воздухе что-то прорвалось - сильно рванул ветер и с шумом, со свистом закружил по степи. Тотчас же трава и бурьян подняли ропот, на дороге закружилась пыль, побежала по степи и, увлекая за собой солому, стрекоз и перья, черным вертящимся столбом поднялась к небу и затуманила солнце. По степи, вдоль и поперек, спотыкаясь и прыгая, побежали перекати-поле, а одно из них попало в вихрь, завертелось, как птица, полетело по небу и, обратившись там в черную точку, исчезло из виду. За ним понеслось другое, потом третье, и было видно, как два перекати-поле столкнулись в голубой вышине и вцепились друг в друга, как на поединке.
0,0(0 оценок)
Ответ:
nikitosik1296
nikitosik1296
05.07.2020 01:35
Ну почему,когда просят написать программу никто никогда не указывает язык программирования.я напишу на языке паскаль с входным и выходным файлом,но если это не тот язык,твоя проблема.(сообщения в фигурных скобках,это комментарии,просто для пояснение,можешь удалить их)

program p1;
const n=10;
var a : array[1..n] of integer;
i,b,c:integer;
begin 
randomize; 
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);

for i:=1 to n do {Заполнение исходного массива}   
a[i]:=random(21)-10;
  
for i:=1 to n do {Вывод исходного массива(можно удалить эти строчки)}
write(a[i]:4);

c:=0; {Инверсия массива} 
for i:=1 to 2 do  begin   
b:=a[i];   
a[i]:=a[5-c];   
a[5-c]:=b;   
c:=c+1; 
end; 
c:=0; 
for i:=6 to 8 do 
begin   
b:=a[i];   
a[i]:=a[10-c];   
a[10-c]:=b;   
c:=c+1; 
end; 
writeln;
  
for i:=1 to n do {Вывод инверсированого массива} 
write(a[i]:4);

close(input);
close(output);
end.
0,0(0 оценок)
Популярные вопросы: Другие предметы
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота