С клавиатуры одной строкой вводят имя и фамилию. Составьте программу, которая выводит сначала фамилию, а потом имя.

Uses crt;
var s,s1,s2:string;
i,k:integer;
begin
readln(s);
k:=pos( ,s)-1;
for i:=1 to k do
s1:=s1+s[i];
k:=k+2;
for i:=k to length(s) do
s2:=s2+s[i];
writeln(s2, ,s1);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.