С клавиатуры вводится строка. Заменить в ней слово dog на слово cat.
' Kod na yazike VB.NET Module Moduel1 Sub Main() Dim s As String=Console.ReadLine() Dim p As Integer p=InStr(1,s,"dog") s=Mid(s,1,p-1) & "cat" & Mid(s,p+4) Console.WriteLine(s) End Sub End Module
а можно
pascal))
pascal ne znayu