Question

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

Answer 1

Эмм.. Pascal:
////////////////////
var
a, b, c:String;
begin
a := 'Я очень хорошая вычислительная машина';
b := 'Я хороший робот';
writeln('Введите текст ', a, ' и получите текст', b);
readln(c);
if a = c then
begin
writeln(b);
end;
end.

Ответ 2:
var
b: array [1..4] of String[9] = ('ДОНОР', 'ЖЕЗЛ', 'КОЛЕНО', 'КРОКОДИЛ');
a, c:String;
i:Integer;
begin
a := 'ЖЕЛЕЗНОДОРОЖНИК';
writeln('Введите текст ', a, ' и получите слова');
for i:= 1 to 4 do
begin
writeln(b[i]);
end;
readln(c);
if a = c then
begin
for i:= 1 to 4 do
begin
writeln(b[i]);
end;
end;
end.

Answer 2

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

Answer 3

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

Answer 4

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

Answer 5

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

Answer 6

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