Написать программу для паскаль, которая заменяет - вопрос №9605085 от dok12369 23.10.2020 09:18

Question

Информатика: Написать программу для паскаль, которая заменяет первый пробел заданным символом

dok12369 · Answer

PascalABC.NET 3.4.2, сборка 1887 от 30.11.2018Внимание! Если программа не работает, обновите версию!

begin

var s := ReadlnString;

var i := Pos(' ', s);

if i > 0 then

begin

var c := ReadlnChar('Пробел найден. Чем заменить?');

s[i] := c;

s.Println

end

else Println('Пробел на обнаружен')

end.