Паскаль.Дана строчка, содержащая слова, разбитые одним пробелом. Напечатать все слова,

Паскаль.
Дана строчка, содержащая слова, разбитые одним пробелом. Напечатать все слова, отличные от заключительного слова.

Задать свой вопрос
1 ответ
var
  s: string;

begin
  readln(s);
  write(s.Split(' ')[0], ' ');
  foreach s1: string in s.Split(' ') do
    if (s1 lt;gt; s.Split(' ')[0]) then
      write(s1, ' ');
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт