Pascal ABC/ C клавиатуры вводят два слова. Составить программу, которая проверяет, не...

0 голосов
56 просмотров

Pascal ABC/ C клавиатуры вводят два слова. Составить программу, которая проверяет, не начинается ли второе слово с той же буквы, которой оканчивается первое слово


Информатика (1.8k баллов) | 56 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

var s1,s2: string;

begin

writeln('Введите 2 слова:');

readln(s1);

readln(s2);

if s1[length(s1)]=s2[1]

then writeln('второе слово начинается с той же буквы, которой оканчивается первое слово')

else writeln('последняя буква первого слова отличается от первой буквы второго слова');

end.



image
(194k баллов)
0

спасибо большое за решение. Может еще с программой поможешь подобного духа?

0