Итак, продолжаем решение задач на строки в паскале. Сегодня я публикую исходник программы на паскаль, задача которого - выводить буквы, которые есть в двух, заранее заданных строках.
Итак задача написать программу на паскаль. Текст задачи:
Даны две строки. Выведите буквы, встречающиеся и в той, и в другой строках.
Для того, чтобы решить эту задачу, нужно лишь знать процедуры и функции, применимые для строк, а также про цикл с параметром.
Исходный код программы Pascal:
var a,b:string; //Описание переменных
i,j:integer;
begin //Начало
readln(a); //Считывание первой строки
readln(b); //Считывание второй строки
for i:=1 to length(a) do //Цикл с параметром для первой строки
for j:=1 to length(b) do //Цикл с параметром для второй строки
if a[i]=b[j] then write(a[i]); //Вывод букв
end. //Конец программыСкачать исходник: pas6zed.pas
Заходите на наш сайт, подписывайтесь на группу Вконтакте и читайте нас в твиттер. Главное, помните, что решение задач по программированию не так уж сложно, как кажется!
Кстати, рекомендую сайт http://www.remotec.ru/?opt=cat&id_parent=2457&level=1!