Написать программу для паскаль, которая заменяет - вопрос №9604860 от Sulaiman00 15.02.2020 16:41

Question

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

Sulaiman00 · 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.