Перевести код из Pascal в C

[JLmd]

Так как в нашем универе решили преподавать на 1 курсе Си, а я в нём дуб дубом, то пожалуйста, помогите перевести этот код в Си

Задача:Проверить явяются ли два слова обращенными друг к другу, то есть первое читается слева на право, так же как второе справа на лево

var s1,s2:string;
n,i,k:byte;
begin
write('Введите первое слово: ');
read(s1);
write('Введите второе слово: ');
read(s2);
if length(s1)<>length(s2) then write('Нет')
else
begin
n:=length(s1);
k:=0;
i:=1;
while(i<=n)and(k=0) do
if s1[i]<>s2[n-i+1] then k:=1
else i:=i+1;
if k=0 then write('Да') else write('Нет')
end
end.

[Bugrimov]

https://nicknixer.ru/programmirovani...indromom-na-c/