Нужно создать программу на паскале, которая соответствует данному условию: "Дана строка, содержащая не более 100 символов. Среди символов строки особую роль играет символ #, появление которого в ней означает удаление предыдущего символа, и символ $, появление которого в ней означает удвоение предыдущего символа. "

Предыдущий
вопрос Следующий
вопрос

Программа на Pascal может выглядеть следующим образом:

program Main;
var
str, resultStr: string;
i: integer;
begin
writeln('Введите строку:');
readln(str);
resultStr := '';
for i := 1 to length(str) do
begin
if (str[i] = '#') then
begin
delete(resultStr, length(resultStr), 1);
end
else if (str[i] = '$') then
begin
resultStr := resultStr + resultStr[length(resultStr)];
end
else
begin
resultStr := resultStr + str[i];
end;
end;
writeln('Результат: ', resultStr);
end.

Эта программа считывает введенную пользователем строку, затем проходит по каждому символу строки и выполняет определенные действия в зависимости от встреченного символа (# - удаление предыдущего символа, $ - удвоение предыдущего символа). Результат работы программы выводится на экран.