Форум программистов, компьютерный форум, киберфорум
Free Pascal
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Free Pascal
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
Другие темы раздела
Free Pascal Даны два массива целых чисел.Определить наименьшее общее кратное для всех элементов каждого из массивов.Вывести наименьшие общие кратные на экран в по https://www.cyberforum.ru/ free-pascal/ thread805837.html
помогите пожулуиста,срочно надо. Даны два массива целых чисел.Определить наименьшее общее кратное для всех элементов каждого из массивов.Вывести наименьшие общие кратные на экран в порядке убывания. 		Задача по ООП Free Pascal
Дано объект :окружность поле:радиус ,центр окружности методы:конструктор инициализации площадь круга длина окружности.
Free Pascal Free Pascal помогите пожалуйста. Написать программу,содержащую процедуру,которая вставляет в матрицу строку или столбец с заданным номером. https://www.cyberforum.ru/ free-pascal/ thread805742.html Free Pascal Прокрутка текста при нажатии клавиш "вверх" и "вниз" Написать программу, считывающую текстовый файл и осуществляющую скроллинг его одержимого по экрану вперед и назад при нажатии клавиш "вверх" и "вниз". https://www.cyberforum.ru/ free-pascal/ thread805710.html
Free Pascal Расчет по двум формулам
Доброго времени суток. помогите пожалуйста с решением задачи: написать программу для расчета по двум формулам. результаты вычисления по обоим формулам должны совпадать. 		Free Pascal Графика:передвигающаяся машинка Нужно чтобы машинка двигалась с лева на право,а 2 программа чтобы по параболе https://www.cyberforum.ru/ free-pascal/ thread804454.html
Free Pascal Составить программу для вычисления в точках https://www.cyberforum.ru/ free-pascal/ thread804115.html
Выбрать алгоритм программу для вычисления в точках х, = а + i-h, i = 0, 1, 2..., n, h - (b - а)/п промежутка наибольшего и среднего значений функции Для выполнения задания воспользоваться оператором цикла FOR 		Использовать в данной программе процедуру с параметром Free Pascal
Использовать в данной программе процедуру с параметром program matrix; uses crt; var a: array of real; i,y,n,m: integer; begin clrscr; writeln ('Введите количество строк и столбцов матрицы А:'); readln (n,m); clrscr;
Free Pascal Массив с инкрементом =1 заполнить по спирали Заполнить массив 100х100 натуральными числами с инкрементом равному единице. Заполнение массива происходит по спирали. Я разобрался с алгоритмом изменения "координат" и индексов, но с паскалем не дружу, нужна помощь. Алгоритм таков: сначала индексы имеют значения (1,1), потом индекс строк остается неизменным (приращениеY = 0), а индекс столбцов увеличивается (приращениеX = 1). После того как... https://www.cyberforum.ru/ free-pascal/ thread804042.html Free Pascal Дан массив из 20 чисел. Для каждого числа необходимо определить количество чисел в массиве кратных ему Помогите пожалуйста, подскажите идею или программу! Дан массив из 20 чисел. Для каждого числа необходимо определить количество чисел в массиве кратных ему. Заранее спасибо:) https://www.cyberforum.ru/ free-pascal/ thread804010.html
Free Pascal Перевести все числа в тексте в двоичное представление
На планете Роботов очень не любят десятичную систему счисления, поэтому они попросили Вас написать программу, которая заменяет все встречающиеся в тексте числа на эти же числа, но в двоичной системе счисления. Входные данные Единственная строка, состоящая из любых символов. Длина строки не превышает 255 символов. Гарантируется, что во всех числах нет ведущих нулей. Выходные данные... 		Free Pascal Последовательность рядов Преподаватель по программированию некоего Центра для одаренных детей, узнав, что его ученики знают математику 3-го класса на 97.001 процентов, решил проверить их знания по курсу математики 1-го класса. Для этого он взял за основу популярнейшую у математиков 1-го класса задачу. Первоклассник должен был продолжить следующую последовательность рядов: 1 11 21 1211 111221 312211 13112221 https://www.cyberforum.ru/ free-pascal/ thread803460.html
...
1804 / 1268 / 935
Регистрация: 12.02.2013
Сообщений: 2,063
12.03.2013, 06:10 0

Для каждой буквы первого слова определить, входит ли она во второе слово - Free Pascal - Ответ 4241950

12.03.2013, 06:10. Показов 1386. Ответов 1
Метки (Все метки)
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

var
   first, second: string;
   chars: set of char;
   i: integer;
 
begin
   write('Input first word: ');
   readln(first);
   write('Input second word: ');
   readln(second);
 
   for i:= 1 to length(second) do
      chars := chars + [second[i]];
 
   for i:= 1 to length(first) do
      if (first[i] in chars) then
         write('yes ')
      else
         write('no ');
end.
Название: image.PNG Просмотров: 44 Размер: 3.1 Кб

Вернуться к обсуждению:
Для каждой буквы первого слова определить, входит ли она во второе слово Free Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 12.03.2013, 06:10
Готовые ответы и решения:

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны два слова. Для каждой буквы первого слова (повторяющиеся буквы первого слова не рассматривать)...

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны два слова. Для каждой буквы первого слова (повторяющиеся буквы не рассматривать) определить,...

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

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны 2 слова. Для каждой буквы первого слово определить входит ли она во второе слово....

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 12.03.2013, 06:10
Помогаю со студенческими работами здесь

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны 2 слова. Для каждой буквы первого слова (в том числе и для повторяющихся в этом слове букв) ...

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны 2 слова. Для каждой буквы первого слово определить входит ли она во второе слово....

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны два слова. Для каждой буквы первого слова (в том числе и для повторяющихся в этом слове букв)...

Для каждой буквы первого слова определить, входит ли она во второе слово
Даны два слова. Для каждой буквы первого слова определить, входит ли она во второе слово....

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru