Аватар для Ixmil
19 / 187 / 0
Регистрация: 17.06.2013
Сообщений: 2,163

Подскажите про оператор IF THEN END IF

23.11.2021, 19:51. Показов 13808. Ответов 161
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Тема: Подскажите про оператор IF THEN END IF
Ограничено ли число команд выполняемых при соблюдении его условия или же это может быть любое число комманд?

Потому что в Паскале если пишут подобным образом: if then то это означает что в случае выполнения условия оператора может выполняться только одна инструкция следующаяя сразу за словом then. А следующая команда уже не будет относится к оператору. А если нужно чтобы количество комманд внутри условного оператора было любым нужно писать как:
if then begin end;. Я заинтересован в использовании только универсального варианта условного оператора Бейсика у которого число комманд внутри оператора может быть любым. Если же оператор IF THEN END IF как то переделывается в более уневерсальный вариант то не могли бы вы подсказать как это делать?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
23.11.2021, 19:51
Ответы с готовыми решениями:

Excel 2013 32-bit URLDownloadToFile пишет "Compile error: only comment may appear after End Sub End Function or End Prop
Добрый день! перепробовал все варианты и не вызывается функция URLDownloadToFile: пишет "Compile error: only comment may appear...

Оператор Try . Except . Finally . End; при работе с ресурсами
Здравствуйте. Задача такая. Есть текстовый файл в ресурсах, который считывается и записывается в Memo. Требуется предусмотреть...

Оператор for. Для чего в коде дополнительные begin-end
Program DimanRu; Var name, surname: string; i:integer; Begin; Writeln('Введите имя...'); Readln(name); Writeln('Введите...

161
Модератор
10057 / 3902 / 884
Регистрация: 22.02.2013
Сообщений: 5,853
Записей в блоге: 79
30.12.2021, 16:23
Студворк — интернет-сервис помощи студентам
CoderHuligan, ты противопоставляешь такую систему современной со стеком и утверждаешь что старая система - тормоз, но кроме беспочвенных высказываний ничего нет. Про какую-то экономию памяти непонятную, про то что тогда это работало, а сейчас нет. Это все твои слова. Вот я тебе и говорю реализуй такую систему и покажи ее преимущества, пока я даже отдаленно не могу понять в чем фишка.
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
30.12.2021, 18:51
Цитата Сообщение от locm Посмотреть сообщение
Зачем? У каждого потока свой стек. Локальные переменные в стеке. Функции в потоках выполняются независимо и ничего синхронизировать не нужно.
locm, человек ни разу не программировал мультитред, он пока не понимает что происходит, думает что можно
из одного потока работающего прямиком передать управление в другой поток.
На деле же это просто два совершенно разных подхода к архитектуре и мыслить одинаковыми категориями
у него не получится.


CoderHuligan, тебе нужно понять, что мультитред модель ПРЕДПОЛАГАЕТ разбиение задачи на
НЕЗАВИСИМЫЕ блоки. И чем более они независимые, тем качественнее и быстрее алгоритм для мульти.
У каждого потока свои регистры и стек, потоки могут писать в общую память, результаты получишь в зависимости
от полосы пропускания шины(т.е. наглеть не надо). Синхронизация происходит на уровне системы (mutex-ы),
это всё руками делается. И нет никакого "одна часть падает, остальное работает", если процесс(и соответственно
любой его поток) производит некорректную операцию то система прибивает его сразу же.

Цитата Сообщение от CoderHuligan Посмотреть сообщение
Учитывалось, но только с точки зрения создателей компиляторов, то есть тех, кто реально контачил с железом.
Если ты про самые первые железяки и инжей, то эти знания устарели сразу, как только появились микропроцессоры. Т.к. это повлекло развитие всей периферии. И под машинные коды пришлось переписывать все компиляторы\интерпретаторы. Каркас конечно определённый был, но по развитию железа там был швах
и как только оно пошло, пошло и развитие компиляторов.
Тут нужно ещё уточнить, BASIC довольно поздно вклинился и поздно развился, в отличие от Pascal'я.
Сейчас вообще нет смысла обсуждать весь этот допотопный дроч на перфолентах и перфокартах с прокалыванием дыр,
всякие тумблеры и прочее.
Это был каменный век вычислений, 80-е и 90-е можно считать "золотым веком" IT, потому что было сделано
больше всего, а сейчас мы имеем "постмодернизм" со всеми вытекающими. Тогда люди знали как делать
но не всегда знали зачем они это делают, сейчас же более менее знают зачем, но не знают как.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.12.2021, 18:51
Помогаю со студенческими работами здесь

Оператор условия не открывает ветвь then begin end, несмотря, на то, что условие выполняется
Учусь по самоучителю "Песни о Паскале". Код программы предложенный автором не кидать, и ваши коды тоже т.к. сам хочу разобраться. Условие...

Про оператор IF
Добрый вечер. Переменная а получила значение а = "Иванов Иван", нужно найти в списке этого "Иванов Иван" Запускаем цикл и...

Не могу поставить end. после else – пишет "ожидался оператор"
uses crt; var a:integer; k:string; begin; randomize; repeat clrscr; a:=random(4); if a=1 then begin

Подскажите случаи, когда количество begin и end в программе не совпадают
подскажите случаи когда кол-во begin & end в прграмме не совпадают :swoon: вот первый : case .. of ..... end;

Простая задачка про тернарный оператор
Переписал с учебника простую задачку, однако на 10 и 12 строке показывает ошибки. Что тут не так? #include<iostream> ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
162
Ответ Создать тему
Опции темы

Новые блоги и статьи
Благородство как наказание
Maks 24.04.2026
У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru