program Calc1;
var
m, k, x, y: Double;
begin
Write ('Введите m, k, x: ');
ReadLn (m, k, x);
if m * k - x >= 2 then
y := Sqr (x) + Sin (6 * x) - (k + 1)
else
y := Power (x, 3) - m * k + 3;
WriteLn ('y = ', y :20 :10);
ReadLn;
end.
program Calc2;
const
E = 1;
F = -2;
var
x, y: Double;
begin
Write ('Введите x: ');
ReadLn (x);
if x > Pi then
y := Sqr (Pi) + E * x * Ln (x)
else if x < 0 then
y := 0
else
y := Pi / 4 - F * x;
WriteLn ('y = ', y :20 :10);
ReadLn;
end.
Объяснение:
Медици́нская сестра́ (медсестра́)[1] — специалист со средним специальным медицинским образованием в области сестринского дела. Медицинская сестра относится к среднему медицинскому персоналу, является младшим специалистом (это указано в дипломе медсестры) по отношению к специалисту — врачу.
Начальное медицинское образование получают младшие медицинские сестры и санитарки, окончившие специальные курсы или получившие неполное среднее медицинское образование. Они относятся к младшему медицинскому персоналу.
Медицинская сестра выступает врача в лечебно-профилактических учреждениях, выполняет врачебные назначения и осуществляет сестринский процесс.
Поделитесь своими знаниями, ответьте на вопрос:
Сkpolyakov у меня ответ 38, а там пишут ответ 388, можно какой ответ у вас получился, и само решение. заранее само : исполнитель редактор получает на вход строку цифр и преобразовывает её.редактор может выполнять две команды, в обеих командах v и w обозначают цепочки цифр. 1. заменить (v, w) 2. нашлось (v) первая команда заменяет в строке первое слева вхождение цепочки v на цепочку w, вторая проверяет, встречается ли цепочка v в строке исполнителя редактор. если она встречается, то команда возвращает логическое значение «истина», в противном случае возвращает значение «ложь». какая строка получится в результате применения ниже программы к строке, состоящей из 125 идущих подряд цифр 8? в ответе запишите полученную строку. начало пока нашлось (333) или нашлось (888) если нашлось (333) то заменить (333, 8) иначе заменить (888, 3) конец если конец пока конец