Question

ПРОШУ ПОМОГИТЕ, ОЧЕНЬ НУЖНО!! ИНФОРМАТИКА 10 КЛАСС, PASCAL. Дана строка, содержащая два слова, разделенные дефисом. написать программу, добавляющую пробел до и после дефиса

Answer 1

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString;
  var p:=Pos('-',s);
 if p>0 then begin s:=s.Replace('-',' - '); Writeln(s) end
  else Writeln('Дефис не найден')
end.

Пример
черно-белый
черно - белый

Answer 2

Writing a Pascal Program to Add Spaces Around a Hyphen

To write a Pascal program that adds spaces before and after a hyphen in a given string, you can follow the steps below:

1. Input the String: Prompt the user to input the string containing two words separated by a hyphen. 2. Find the Hyphen: Search for the position of the hyphen in the string. 3. Insert Spaces: Insert a space before and after the hyphen. 4. Output the Modified String: Display the modified string with spaces around the hyphen.

Here's a sample Pascal program to achieve this:

program AddSpacesAroundHyphen;

var
  inputString, modifiedString: string;
  hyphenPosition: integer;

begin
  // Input the string
  writeln('Enter the string containing two words separated by a hyphen: ');
  readln(inputString);

// Find the position of the hyphen
  hyphenPosition := pos('-', inputString);

// Insert spaces before and after the hyphen
  modifiedString := copy(inputString, 1, hyphenPosition - 1) + ' - ' + copy(inputString, hyphenPosition + 1, length(inputString) - hyphenPosition);

// Output the modified string
  writeln('Modified string with spaces around the hyphen: ', modifiedString);
end.

You can use this program as a starting point and modify it according to your specific requirements.