Question

Se considera cuvantul x .sa se scrie un program care formeaza alt cuvint y din literele cuvintului x fara litera a.(Pascal)

Answer 1

program cuvant;
Var x,y : String; i : Integer;
begin
     write('x= ');readln(x);
     For i := 1 to length(x) do 
        if (x[i] <> 'a') then 
             y := y + x[i];
    writeln('y=', y);
end;