Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal В тексте все полиндромы выделить красным цветом с увеличеной яркостью https://www.cyberforum.ru/ turbo-pascal/ thread249952.html
Помогите пожалуйста. Задача не тяжелая, но не могу понять как выделить в самом тексте. Напишите код пожалуйста, если не сложно:good:
Преобразование множества прямых линий Turbo Pascal
Множество прямых М задано коэффициентами их уравнений вида Ах + Вy + C = 0. Выполнить над М последовательность действий, указанную в задании. а) Вычислить расстояния от заданной точки А(хА, yА) до...
Turbo Pascal циклические алгоротмы
Задано число N неизвестной разрядности .Вычислить,сколько цифр (разрядов) в этом числе.
Turbo Pascal Улитка Паскаля(расшифровка) program Grafik; uses Crt, Graph; const grPath = 'f:\tp7\bgi'; A = 50; B = 70; var grDriver, grMode: Integer; https://www.cyberforum.ru/ turbo-pascal/ thread249941.html
Turbo Pascal Найти номера строк массива, в которых положительных элементов больше, чем отрицательных https://www.cyberforum.ru/ turbo-pascal/ thread249919.html
Найти номера строк массива, в которых положительных элементов больше, чем отрицательных. Из полученных значений сформировать одномерный массив.
Сортировка Шелла Turbo Pascal
Здравствуйте. Нужна помощь надо написать программу сортировка Шелла. смотрел на разных сайтах и в том числе на этом. и все они какие-то сложные и в половине случаев выдает ошибку. Может это я не...
двумерный массив Turbo Pascal
Дана матрица размером N*M. Переставить столбцы матрицы в соответствие с возрастанием среднего арифметического по столбцам
Turbo Pascal Записи Написать программу, определяющую количество авто. Для каждого владельца известны количество авто (тип integer), марка автомобиля (тип string), фамилия (тип string). https://www.cyberforum.ru/ turbo-pascal/ thread249871.html
Turbo Pascal Поделить все элементы каждой строки массива на наибольший по модулю элемент этой строки https://www.cyberforum.ru/ turbo-pascal/ thread249870.html
Дан массив размерностью nхm. Поделить все элементы каждой строки на наибольший по модулю элемент этой строки.
Turbo Pascal Вывести сумму цифр числа Дана строка, изображающая целое число. Вывести сумму цифр этого числа. https://www.cyberforum.ru/ turbo-pascal/ thread249868.html
4 / 4 / 3
Регистрация: 17.01.2011
Сообщений: 12
28.02.2011, 19:29 0

Определить , можно ли из букв первого из них получить второе

28.02.2011, 19:29. Просмотров 1054. Ответов 3
Метки (Все метки)

Ответ

к первому случаю думаю так подойдет
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program q1;
var s1,s2:string;
    i,j:integer;
    ind:boolean;
begin
readln(s1);
readln(s2);
 for i:=1 to length(s1) do
  begin
   ind:=false;
  for j:=1 to length(s2) do
   if s1[i] = s2[j] then
    ind:=true;
   if ind=false then
    begin
     write('nelzia');
     exit;
    end;
  end;
  write('mozno');
end.


Вернуться к обсуждению:
Определить , можно ли из букв первого из них получить второе
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.02.2011, 19:29

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Определить, можно ли из букв первого слова получить второе слово
даны 2 слова.определить можно ли из букв первого из них получить второе.рассмотреть 2 варианта:...

Можно ли вычеркиванием букв из первого слова получить второе.
Заданы два слова. Составьте программу, которая определит, можно ли вычеркиванием букв из первого...

Можно ли вычеркиванием букв из первого слова получить второе.
1 задание. В массиве A(N, M), заполненном нулями и единицами, выделите такой квадратный участок...

Строки. Определить, можно ли из букв первого составить второе
Даны два слова. Определить, можно ли из букв первого составить второе. Каждая из букв второго слова...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.