Напишите программу, которая преобразует первые буквы слов в верхний регистр, меняет слова местами и ставит после каждого слова вопросительный знак. Введите строку из двух слов, разделенных пробелом. Входные данные: "начинается урок" Выходные данные: "урок? начинается?" 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.
Эта программа считывает строку, разделяет ее на два слова, преобразует первую букву каждого слова в верхний регистр, меняет их местами и добавляет вопросительный знак после каждого слова. Затем она выводит полученную строку.
Надеюсь, это решение понятно школьнику! Если у него есть еще вопросы или что-то непонятно, пожалуйста, дайте знать! Я с радостью помогу.
Знаешь ответ?