Решить задачу в Паскале:

В символьном массиве из 6 элементов, заданных с
клавиатуры, удалить символы «=».

срочно! Жду быстрого и правильного ответа)


1
Зря, не уверен в верности ответа

Ответы и объяснения

2013-12-18T18:33:34+00:00
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.
проверь, я не помню можно так или нет
спасибо большое ^^ проверю завтра