Question

ПАСКАЛЬ
Ввести имя, отчество и фамилию. Поменять имя и отчество местами (через тип данных string) "Отчество, имя и фамилия"
Ни типо пишешь в графу: юрий сергеевич кобылкин, а оно исправляет на сергеевич юрий кобылкин

Answer 1

PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadlnString.ToWords;
  Swap(a[0],a[1]); a.Println
end.

Answer 2

В данной ситуации Вы не имеете права рассуждать о чужом труде уже хотя бы потому, что сами неспособны эти две строки ни написать, ни понять, как теперь выяснилось. И ведете себя при этом, как зарвавшийся нахал.

Answer 3

Порядочные люди, получив ответ, даже если он не соответствует их ожиданиям (по их собственной вине) говорят "спасибо".

Answer 4

Да какие проблемы?

Answer 5

var
s, fam, im, ot: string;
k: integer;

begin
readln(s);
//s := 'Иванов Иван Иванович';
writeln('Длина: ', Length(s));
k := pos(' ', s);
fam := copy(s, 1, k);
delete(s, 1, k);
k := pos(' ', s);
im := copy(s, 1, k);
delete(s, 1, k);
ot := s;
writeln('Отчество: ', ot);
writeln('Имя: ', im);
writeln('Фамилия: ', fam);
end.

Answer 6

Ещё вопросы кусок говна?