Определить в каком предложении и в каком слове пропущена какая буква

@sash21 · Регистрация: 12.12.2009

Author24 — интернет-сервис помощи студентам

Люди, помогите решить задачу ! Даны два одинаковых предложения .в одном из них пропущена буква . определить в каком предложении и в каком слове пропещена какая буква. Спасибо всем,кто может помочь.!!

@Puporev · 12.12.2009, 16:34

Pascal

uses crt;
var s1,s2:string;
    i:byte;
begin
clrscr;
writeln('Введите 2 одинаковых предложения, в одном из них пропущена буква');
writeln('Введите первое предложение:');
readln(s1);
writeln('Введите второе предложение:');
readln(s2);
if length(s1)<length(s2) then
 begin
  writeln('Буква пропущена в первом предложениии!');
  i:=1;
  while s1[i]=s2[i] do
  i:=i+1;
  write('Эта буква ',s2[i]);
 end
else
 begin
  writeln('Буква пропущена во втором предложениии!');
  i:=1;
  while s1[i]=s2[i] do
  i:=i+1;
  write('Эта буква ',s1[i]);
 end;
readln
end.

@sash21 · 12.12.2009, 17:00 **[ТС]**

спасибо большое за помощь!

@sash21 0 / 0 / 0 Регистрация: 12.12.2009 Сообщений: 7
		1
	Определить в каком предложении и в каком слове пропущена какая буква 12.12.2009, 16:09. Показов 1644. Ответов 2 Метки нет (Все метки) Люди, помогите решить задачу ! Даны два одинаковых предложения .в одном из них пропущена буква . определить в каком предложении и в каком слове пропещена какая буква. Спасибо всем,кто может помочь.!! 0

@sash21 0 / 0 / 0 Регистрация: 12.12.2009 Сообщений: 7
	12.12.2009, 17:00 [ТС]	3
	спасибо большое за помощь! 0

Определить в каком предложении и в каком слове пропущена какая буква

Решение