Имеется линейная железная дорога, состоящая из некоторого количества станций (задаётся во входных данных). все станции пронумерованы подряд натуральными числами. задаётся номер начальной станции и количество станций, которое надо проехать (положительное – вправо, отрицательное - влево). если поезд приезжает в тупик, то там и остаётся. сделать программу, определяющую, где окажется поезд в quickbasic. входные данные 10, 5, 3 выходные данные 8

👇

Ответ:

Unknown2281

15.11.2021

MS-DOS QBasic
Версия 1.0
Copyright (C) Microsoft Corporation, 1987-1991.

INPUT n, start, finish
k = start + finish
IF k > n THEN k = n
IF k < 1 THEN k = 1
PRINT k

Тестовое решение
Y:\qbasic>QBASIC.EXE
? 10,5,3
8

Чтобы продолжить, нажмите любую клавишу

4,4(3 оценок)

Открыть все ответы

Ответ:

Ева433

15.11.2021

1)
var
    s: string[6];
    n: integer;

begin
    s := 'отлично';
    n := length(s);
    writeln(length('отлично'));
    writeln(n);
end.

Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
ответ 6

2) рисунок

3)var
    s, s1: string;
    n: integer;

begin
    s := 'информатика';
    s1 := copy(s, 3, 5);
    n := pos(s, s1);
    writeln('s=', s);
    writeln('s1=', s1);
    writeln('n=', n);
end.

Вывод
s=информатика
s1=форма
n=0

Все верно, в s1 не содержится s, а наоборот

Садекватным объяснением! 1) дан фрагмент программы: var s: string[6]; n: integer; begin s: ='отлично

Садекватным объяснением! 1) дан фрагмент программы: var s: string[6]; n: integer; begin s: ='отлично

4,4(27 оценок)

Ответ:

evgenqj2002

15.11.2021

Плюсы:

1)Глобализация породила международную конкуренцию. Конкуренция, в свою очередь, это стимулятор производства, чем она жестче, тем выше уровень производимой продукции. Ведь каждый изготовитель пытается занять выгодное место в сфере международной торговли, поэтому старается сделать все, чтобы его товары были более привлекательными, чем у конкурентов.

2)Глобализация спровоцировала экономию производственных масштабов, что по избеганию скачков в экономике и снижению цен.
3)Международная торговля выгодна всем субъектам рыночных отношений, создание торговых союзов только ускоряет процесс глобализации.
4)Внедрение современных технологий повышению производительности.
5)Страны, находящиеся на стадии развития, могут догнать передовые государства, глобализация дает им фору улучшить свое экономическое положение и твердо укрепиться на мировой арене.

Минусы:

1)Плюсы глобализации не могут распределяться равномерно по всему миру. Некоторые промышленные отрасли от международной торговли получают огромную выгоду, приток квалифицированной рабочей силы из заграницы, финансирование, а другие, наоборот, теряют конкуренто становятся ненужными. Забытым отраслям нужно время и финансы, чтобы реконструироваться, подстроиться под новые условия жизни. У многих это не получается, в итоге владельцы теряют деньги, люди – работу. Такие перемены сильно задевают национальную экономику каждой отдельной страны, вносят изменение в хозяйственные структуры, увеличивается уровень безработицы.
2)Деиндустриализация экономики – обрабатывающие отрасли теряют позиции, в то время как на арену выходит процветающая сфера услуг. Людям приходится переквалифицироваться, чтобы найти себе место в этой глобальной меняющейся системе.
3)Конкуренция порождает большую пропасть между квалифицированными и неквалифицированными сотрудниками. Зарплата первых существенно возрастает, в то время как последние получают копейки или вообще теряют источник дохода. Это опять-таки порождает безработицу, которая расшатывает глобализацию. Но также это хороший стимул для того, чтобы люди обучались, развивались и обретали квалификацию.
4)Глобализация значительно влияет на экосистему мира. Конфликтов по поводу использования природных ресурсов будет не избежать. Мир и так уже на гране большущего раздора, причина которому – вырубка лесов, загрязнение океанов и морей, нерациональное использование благ Земли. Все это может нанести непоправимый вред человечеству и планете в целом.

4,8(6 оценок)

Это интересно:

Компьютеры-и-электроника

09.07.2020

Как уничтожить жесткий диск: советы и рекомендации...

Компьютеры-и-электроника

20.11.2020

Как создать простую таблицу стилей CSS с помощью Notepad...

Образование-и-коммуникации

12.06.2021

Как составить план: секреты планирования на будущее...

Искусство-и-развлечения