Question

Pascal ABC.
Даны 2 слова, отделенные друг от друга запятой. Написать программу, которая удаляет запятую.
ПОМОГИТЕ ПОЖАЛУЙСТА!!! ОЧЕНЬ СРОЧНО!!!

Answer 1

Program ff;

Var

A: String;

Begin

Readln(a);

While pos (',',a) >0 do

Delete (a ,pos(',',a),1);

Writeln(a)

End.