//Аритмия синдром преждевременного возбуждения желудочков диагностика и лечение
Переменные:а1, а2, а3, а4, а5, гемодинамика_нестабильна, препарат, МАССА, инф_номер_амиодарон, инф_номер_пропафенон, инф_номер_новокаинамид, продолжать_дефибрилляцию, амиодарон_начат, МассивДата[6], ПеременнаяМинуты

БЛОК ВХОД
	амиодарон_начат=0
	ВЫЗОВ_ВРАЧА("Произведите общий осмотр и физикальное обследование пациента.", 15 мин)
	ВЫЗОВ_ВРАЧА("Подключите пациента к аппарату ЭКГ.", 2мин)
	МУЛЬТИВЫБОР("Диагностические критерии.", "Укороченный интервал PQ (<120 мс)/(Отсутствует=0)/Присутствует=1/Неизвестно=0", а1,\
 "«Дельта – волна»/(Отсутствует=0)/Присутствует=1/Неизвестно=0", а2,\
 "Уширенный комплекс QRS/(Отсутствует=0)/Присутствует=1/Неизвестно=0", а3,\
 "Дискордантные по отношению к QRS изменения T и ST/(Отсутствуют=0)/Присутствуют=1/Неизвестно=0", а4,\
 "Нерегулярне интервалы RR/(Отсутствует=0)/Присутствует=1/Неизвестно=0", а5)
	ЕСЛИ а1==1 или а2+а3+а4+а5==4 или а2==1 то
		ВЫЗОВ_ВРАЧА("Диагностирован синдром преждевременного возбуждения желудочков.", 1мин)
	иначе
		ВЫЗОВ_ВРАЧА("Синдром преждевременного возбуждения желудочков не диагностирован. Завершение работы алгоритма", 1мин)
		ОСТАНОВИТЬ_АЛГОРИТМ
	КОНЕЦ_ЕСЛИ
//лечение
	ВЫЗОВ_ВРАЧА("Противопоказания: бета-адреноблокаторы, антагонисты кальция, сердечные гликозиды, аденозин.", 2мин)
	МАССА=ВВОД("Оцените массу пациента, (кг):", 30, 250)
	гемодинамика_нестабильна=ВЫБОР("Оцените характер гемодинамики", "стабильная", 0, "нестабильная", 1)
		ЕСЛИ гемодинамика_нестабильна==1 то
			ВЫЗОВ_ВРАЧА("Подготовить дефибриллятор, разряд 200 Дж синхронизированный с зубцом P. Начать электроимпульсную терапию.", 10 мин)
			продолжать_дефибрилляцию=1
			ПОКА продолжать_дефибрилляцию==1
				ВЫЗОВ_ВРАЧА("Все от пациента! Разряд!", 3мин)
				СПАТЬ(1 мин)
				продолжать_дефибрилляцию=ВЫБОР("Аритмию удалось купировать", "Да", 0, "Нет", 1)
				ЕСЛИ продолжать_дефибрилляцию==1 и амиодарон_начат==0 то
					ВЫЗОВ_ВРАЧА("Развести 450 мг амиодарона до 50 мл в 5% растворе глюкозы.", 2мин)
					Доза(5*4, "мг/кгчас")
					инф_номер_амиодарон=ВВЕСТИ_НАЧАТЬ(1, амиодарон, 5*МАССА*4 мг/час, 15 мин)
					амиодарон_начат=1
				КОНЕЦ_ЕСЛИ
			КОНЕЦ_ПОКА
		иначе
			препарат=ВЫБОР("Выберите препарат:", "Новокаинамид", 1, "Пропафенон", 2, "Амиодарон", 3)//, "Нибентан", 4)
			ЕСЛИ препарат==1 то
				ВЫЗОВ_ВРАЧА("Развести 1 г новокаинамида в 100 мл 0.9% раствора NaCl.", 2мин)
				ВВЕСТИ_БЫСТРО("Вводить капельно 1 г новокаинамида в 100 мл 0.9% р-ра NaCl в течение 20 мин.",100, новокаинамид, 1000 мг, в/в)
			КОНЕЦ_ЕСЛИ
			ЕСЛИ препарат==2 то
				//ЗАДАТЬ_ТЕКСТ("Капельно вводить пропафенон "+строка(1.5*МАССА)+" мг со скоростью "+строка(1.5*МАССА/15)+" мг/мин.")// в течение 15 мин.")
				Доза(1.5/15, "мг/кгмин")
				инф_номер_пропафенон=ВВОДИТЬ_И_ЖДАТЬ(1, пропафенон, 1.5*МАССА*60/15 мг/час, 15 мин)
			КОНЕЦ_ЕСЛИ
			ЕСЛИ препарат==3 то
				ВЫЗОВ_ВРАЧА("Развести 450 мг амиодарона до 50 мл в 5% растворе глюкозы.", 2мин)
				Доза(5*4, "мг/кгчас")
				инф_номер_амиодарон=ВВОДИТЬ_И_ЖДАТЬ(1, амиодарон, 5*МАССА*4 мг/час, 15 мин)
				ВЫЗОВ_ВРАЧА("Развести 450 мг амиодарона до 50 мл в 5% растворе глюкозы.", 2мин)
				инф_номер_амиодарон=ВВОДИТЬ_И_ЖДАТЬ(1, амиодарон, 50мг/час, 9 час)
				ВЫЗОВ_ВРАЧА("При необходимости повторить инфузию амиодарона со скоростью 50мг/час. Максимальная суточная доза 1.8 г.", 2 час)
			КОНЕЦ_ЕСЛИ
			ЕСЛИ препарат==4 то
				//ЗАДАТЬ_ТЕКСТ("Болюсно внутривенно вводить нибентан (0.25*МАССА) мг.")
				ВВЕСТИ_БЫСТРО(1, нибентан, 0.25*МАССА мг, в/в)
				СПАТЬ(3 мин)
			КОНЕЦ_ЕСЛИ
			
		КОНЕЦ_ЕСЛИ
КОНЕЦ_БЛОКА




































