Решить задачу в Паскале:В символьном массиве из 6 элементов, заданных с клавиатуры, удалить символы «=».срочно! Жду быстрого и правильного ответа)

Question

Решить задачу в Паскале:В символьном массиве из 6 элементов, заданных с клавиатуры, удалить символы «=».срочно! Жду быстрого и правильного ответа)

Решить задачу в Паскале: В символьном массиве из 6 элементов, заданных с клавиатуры, удалить символы «=». срочно! Жду быстрого и правильного ответа)

Гость

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

Accepted Answer

Var S,s1:string;I:integer;Begin Readln(s);For I:=1 to 6;If s[i]='=' then s1:=s1 else s1:=s1+s[i];Writeln(s1);End. проверь, я не помню можно так или нет