
Dayukkod
7 год назад
ЛЁГКАЯ ЗАДАЧА ПО ПАСКАЛЮ! ПОМОГИТЕ, ПОЖАЛУЙСТА! Написать программу которая удаляет все точки из строки s.
ОТВЕТЫ

Авксентьевич
Jul 18, 2019
Var s: string;
begin
writeln(Введите строку:);
readln(s);
while pos(.,s)gt;0 do delete (s,pos(.,s),1);
writeln(s);
end.
Пример:
Введите строку:
primer ... 1.2+5.7=6.9
primer 12+57=69
begin
writeln(Введите строку:);
readln(s);
while pos(.,s)gt;0 do delete (s,pos(.,s),1);
writeln(s);
end.
Пример:
Введите строку:
primer ... 1.2+5.7=6.9
primer 12+57=69
73
Смежные вопросы: