Нужно! исполнитель редактор получает на вход строку цифр и преобразовывает её. редактор может выполнять две команды, в обеих командах v и w обозначают цепочки символов. заменить (v, w) нашлось (v) первая команда заменяет в строке первое слева вхождение цепочки v на цепочку w. если цепочки v в строке нет, эта команда не изменяет строку. вторая команда проверяет, встречается ли цепочка v в строке исполнителя редактор. если она встречается, то команда возвращает логическое значение "истина", в противном случае возвращает значение "ложь". дана программа для исполнителя редактор: начало пока нашлось (222) заменить (222, 1) заменить (111, 2) конец пока конец какая строка получится в результате применения программы к строке вида 1…12…2 (2019 единиц и 2019 двоек)? 11) исполнитель редактор получает на вход строку цифр и преобразовывает её. редактор может выполнять две команды, в обеих командах v и w обозначают цепочки символов. заменить (v, w) нашлось (v) первая команда заменяет в строке первое слева вхождение цепочки v на цепочку w. если цепочки v в строке нет, эта команда не изменяет строку. вторая команда проверяет, встречается ли цепочка v в строке исполнителя редактор. если она встречается, то команда возвращает логическое значение "истина", в противном случае возвращает значение "ложь". дана программа для исполнителя редактор: начало пока нашлось (11) заменить (11, 2) заменить (22, 3) заменить (33, 1) конец пока конец какая строка получится в результате применения программы к строке вида 1…13…3 (2019 единиц и 2119 троек)?

165

473

Посмотреть ответы 1

Ответы на вопрос:

freks2

Информатика

4,7(18 оценок)

Объяснение:

Количество begin должно совпадать с количеством end

Нужно что-то присвоить функции для случая, когда (2*a+b-c)<0

Например, так:

function sqrt1 (a, b, c: real): real;

begin

if (2 * a + b - c) < 0 then

begin writeln (' complex number '); sqrt1:=-1; end

else sqrt1:= sqrt(2 * a + b - c);

end;

150 000+ пользователей

Оформить подписку