Составьте программу позволяющую определить совпадают ли первая буква слова Х и последняя буква слова У.(pascal abc.net)
Составьте программу позволяющую определить совпадают ли первая буква слова Х и последняя буква слова У.(pascal abc.net)
Ответ(ы) на вопрос:
var
x, y: string;
begin
write('Введите слово X: ');
readln(x);
write('Введите слово Y: ');
readln(y);
if x[1] = y[length(y)] then writeln('Буквы совпадают.')
else writeln('Буквы не совпадают.')
end.
Не нашли ответ?
Похожие вопросы