Напишите программу, которая преобразует первые буквы слов в верхний регистр, меняет слова местами и ставит после

Напишите программу, которая преобразует первые буквы слов в верхний регистр, меняет слова местами и ставит после каждого слова вопросительный знак. Введите строку из двух слов, разделенных пробелом. Входные данные: "начинается урок" Выходные данные: "урок? начинается?" 10 класс, pascalabc
Магнитный_Марсианин

Магнитный_Марсианин

Конечно, вот решение задачи на языке PascalABC:

pascal
program ChangeWords;
var
inputStr, word1, word2, outputStr: string;
begin
// Ввод строки с двумя словами
writeln("Введите строку из двух слов, разделенных пробелом:");
readln(inputStr);

// Разделение строки на два слова
word1 := copy(inputStr, 1, pos(" ", inputStr) - 1);
word2 := copy(inputStr, pos(" ", inputStr) + 1, length(inputStr) - pos(" ", inputStr));

// Преобразование первых букв слов в верхний регистр
word1[1] := upcase(word1[1]);
word2[1] := upcase(word2[1]);

// Формирование выходной строки с помощью конкатенации
outputStr := word2 + "?" + " " + word1 + "?";

// Вывод результата
writeln("Выходные данные:");
writeln(outputStr);
end.


Эта программа считывает строку, разделяет ее на два слова, преобразует первую букву каждого слова в верхний регистр, меняет их местами и добавляет вопросительный знак после каждого слова. Затем она выводит полученную строку.

Надеюсь, это решение понятно школьнику! Если у него есть еще вопросы или что-то непонятно, пожалуйста, дайте знать! Я с радостью помогу.
Знаешь ответ?
Задать вопрос
Привет!
hello