1.Используя функции символьных переменных, написать программу, которая из текста «Я очень хорошая вычислительная машина», получила бы текст «Я хорошая машина».
2.Используя функции символьных переменных, написать программу получения из слова ЖЕЛЕЗНОДОРОЖНИК слов ДОНОР, ЖЕЗЛ, КОЛЕНО, КРОКОДИЛ.

Да, и вот что получается "Введите текстЯ очень хорошая вычислительная машинаи получите текстЯ хороший робот"

И вот во второй задаче, бред "Введите текстЖелезнодорожники получите текст[ДОНОР,ЖЕЗЛ,КОЛЕНО,КРОКОДИЛ]"

насколько я понял надо что бы пользователь ввел ЖЕЛЕЗНОДОРОЖНИКИ и получил ДОНОР, ЖЕЗЛ и т.д.

Вводите все точно так же как и написано в примере, учитывая заглавные буквы, и т.д

Я просто скопировала и вставила и ничего не изменяла

Эмм.. Pascal:////////////////////vara, b, c:String;begina := 'Я очень хорошая вычислительная машина';b := 'Я хороший робот';writeln('Введите текст ', a, ' и получите текст', b);readln(c);if a = c thenbeginwriteln(b);end;end.Ответ 2:varb: array [1..4] of String[9] = ('ДОНОР', 'ЖЕЗЛ', 'КОЛЕНО', 'КРОКОДИЛ');a, c:String;i:Integer;begina := 'ЖЕЛЕЗНОДОРОЖНИК';writeln('Введите текст ', a, ' и получите слова');for i:= 1 to 4 dobeginwriteln(b[i]);end;readln(c);if a = c thenbeginfor i:= 1 to 4 dobeginwriteln(b[i]);end;end;end.