Написать функцию F(A,B), которая добавляет в конец строки A, все буквы из A, не встречающиеся в B. Паскаль или же Си.

24 Ноя 2019 в 19:44
117 +1
1
Ответы
1

function F(A,B: string): string;
var
i: integer;
j: integer;
flag: boolean;
begin
for i := 1 to length(A) do
begin
flag := true;
for j := 1 to length(B) do
begin
if A[i] = B[j] then
begin
flag := false;
break;
end;
end;
if flag then
F := F + A[i];
end;
end;

19 Апр 2024 в 01:00
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир