Задача - Паскаль, Turbo Pascal, PascalABC.NET

Aman · 29.09.2010, 13:58

Помогите написать программу пожалуйста.
Даны 2 предложения (предложения вводить самому) вывести на экран символы , которые существуют в 1 и 2 предложениях. Заранее СПАСИБО.

Stilet · 29.09.2010, 15:37

Предположим предложения хранятся в переменках s1 и s2, тогда:

Код:

for i:=1 to length(s1) do
 if pos(s1[i],s2)<>0 then write(s1[i]);
...

29.09.2010, 13:58	#1
Aman Регистрация: 27.08.2010 Сообщений: 9	Задача Помогите написать программу пожалуйста. Даны 2 предложения (предложения вводить самому) вывести на экран символы , которые существуют в 1 и 2 предложениях. Заранее СПАСИБО.

29.09.2010, 15:37	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Предположим предложения хранятся в переменках s1 и s2, тогда: Код: `for i:=1 to length(s1) do if pos(s1[i],s2)<>0 then write(s1[i]); ...` I'm learning to live...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Задача в C#	andresan	Помощь студентам	2	13.07.2010 00:08
Задача	Literus	Microsoft Office Excel	1	01.05.2009 18:07
1 задача	Siroga35	Помощь студентам	4	11.03.2009 20:22
задача на С++	densan	Помощь студентам	5	02.03.2009 20:29