Ввести произвольный текст. В данном тексте есть символ ":".Вывести на экран ту часть текста, которая находиться до первого символа ":".Помогите, прошу =)
Ввести произвольный текст. В данном тексте есть символ ":".Вывести на экран ту часть текста, которая находиться до первого символа ":".Помогите, прошу =)
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var s:string;
Writeln('Введите текст'); Readln(s);
for var i:=1 to s.Length do
if s[i]<>':' then Write(s[i]) else break;
end.
Не нашли ответ?
Похожие вопросы