Составить программу : из слов дуб,робот и лак составить слово урок.

Var
s1,s2,s3,s4: String;
begin
s1:='дуб';
s2:='робот';
s3:= 'лак';
s4:=''+s1[2]+s2[1]+s2[2]+s3[3];
Writeln(s4);
end.