Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Составить блок схему к готовому коду Pascal
program Zad3; var x,x1,x2,dx,MaxX, a,a1,a2,da,MaxA,rez,Max,Max10:real; function FUN(x,a:real):real; begin FUN:=sqr(x)*a; end; begin {Ввод исходных данных} X1:= -10; X2:= 20; var x,x1,x2,dx,MaxX, a,a1,a2,da,MaxA,rez,Max,Max10:real; зачем пробел между MaxX и a? Вместо writeln('x=',x:5:2,'a=' 'a:5:2,' 'FUN=',rez:5:2);{ Лишний ' после a:5:2,} Поставь ...
Pascal Написать функцию, которая по номеру n определяет соответствующее название дня недели
Написати функцию, которая по номеру n определяет соответствующее название дня недели. type день недели = (пн., вт., ср., чт., пт., сб., вос.); номер = 1..7; var n: номер; Как написать простую... например так: program E1; function day(n: byte): string; var s: string; begin case n Of 1: s := 'понедельник'; 2: s := 'вториник';
Pascal Найдите ошибку в коде построения структуры данных Построить структуру данных которая на рисунке и реализовать процедуру чтения данных в указаном порядке Проблема заключается в том, что программа запускается, но просто показывает чёрное окно с... смотрите, окошко с курсором оно не просто так, у вас в коде хотят, чтобы ввели числа - read(p^... но так на вскидку 14 строка - не нормально new(p^.left); p:=p^.right; read(p^.left^.data); вы... https://www.cyberforum.ru/ pascal/ thread1461781.html Pascal Составить блок схему к программе определения четности числа https://www.cyberforum.ru/ pascal/ thread1460769.html
Помогите кому не лень и кто может помочь) Составить блок-схему алгоритма следующей задачи «ввести целое число. Алгоритм должен ответить, четным является это число или нет, делится оно на 3 или нет,...
Pascal Доделать курсач по информатике https://www.cyberforum.ru/ pascal/ thread1462065.html
Приветствую всех! Прошу помочь закончить курсовую работу! Начало есть но как продолжить не знаю. Вот исходник (PascalABC.net) (Анимацию пока не рисовал, хотелось закончить графики для начала):... Уберите Crt и замените delay на sleep.
Pascal Структуры. Вывести фамилии студентов определенного пола https://www.cyberforum.ru/ pascal/ thread1461831.html
Как сделать, чтобы выходила фамилия студента определенного пола. У меня выходит только слово"FIO" Program lb8; Uses crt; Type anketa=record FIO: string; // ФИО POL: char; // ПОЛ Dat_r:... if student.POL='Ж' then Writeln(student.FIO); остальной код не смотрел. мож там тоже косяк.
Вычислить количество элементов массива, меньших С Pascal
1. Имеется файл, в котором содержится размерность массива и его элементы. Вычислить: A. количество элементов массива, меньших С; B. сумму целых частей элементов массива, расположенных после... А) https://www.cyberforum.ru/pascalabc/thread375757.html
Pascal Получить квадратную матрицу порядка n https://www.cyberforum.ru/ pascal/ thread1461436.html
Помогите составить программу, очень нужно! Условие: file:///C:/Users/%D0%B0%D0%B0%D0%B0%D0%B0%D0%B0%D0%B0/Desktop/masiv.PNG Условие напишите в теме. Добавлено через 1 минуту Картинки прикладывать в тему так. https://www.cyberforum.ru/about-forum/thread103521.html
Pascal В матрице определить количество строк, содержащих нули, и столбец с максимальной серией отрицательных чисел
2. Дана целочисленная прямоугольная матрица. Определить: A. количество строк, содержащих хотя бы один нулевой элемент (оформить в виде функции); B. номер столбца, в котором находится самая длинная... (С) rocknrolla const n_max=100; type matr = array of integer; var i,j,n,m: integer; z,x: integer; b: matr;
Найти наибольший элемент побочной диагонали заданной матрицы A(N, N) Pascal
Найти наибольший элемент побочной диагонали заданной матрицы A(N, N) и вывести на печать всю строку, в которой он находится. const max=15; var a:array of real; n,i,j,imx:integer; begin randomize; repeat write('Введите размер матрицы от 2 до ',max,' n='); readln(n); until n in ; writeln('Исходная матрица');
Pascal Вычислить собстывенное значение матрицы https://www.cyberforum.ru/ pascal/ thread1460662.html
Помогите отредактировать код пожалуйста, буду благодарен. В этой строке пишет ошибку procedure Secant(var x0, x, e: real; function F: real); program sobst_znach_matr; {Найти собстсвенные значения... bormant что-то вы перемудрили, достаточно: type TFunc = function (x: Real): Real; ... procedure Secant(var x0, x, e: real; F: TFunc); ... ну и нужно учесть, что вызывать надо
Pascal Задание условия для вывода студентов заданного пола Как задать условие, чтобы на экран выводились студенты заданного пола? осталось только условие записать, не знаю как Program lb8; Uses crt; Type anketa=record FIO: string; // ФИО POL: char;... хотелось бы развидеть этот код... отвечу на вопрос, приблизительно так: if student.POL='Ж' then Writeln(student.FIO); или так: with student do if POL='Ж' then Writeln(FIO); https://www.cyberforum.ru/ pascal/ thread1461658.html
Эксперт Pascal/Delphi
6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
29.05.2015, 18:26 0

Множества: выделить из строки неповторяющиеся буквы, и вывести их на экран в алфавитном порядке - Pascal - Ответ 7689722

29.05.2015, 18:26. Показов 1226. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Выделить из строки неповторяющиеся буквы и вывести их на экран

Вернуться к обсуждению:
Множества: выделить из строки неповторяющиеся буквы, и вывести их на экран в алфавитном порядке Pascal
1
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
29.05.2015, 18:26
Готовые ответы и решения:

Вывести в алфавитном порядке буквы, входящие одновременно во все множества
Пусть D1, D3, D5, D7 – множества, составленные из букв, входящих в названия нечетных дней недели. Вывести в алфавитном порядке: ...

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

Срочно нужна помощь - множества! В алфавитном порядке вывести на экран все гласные, которые входят в каждое N-ое слово.
Вводится не пустая строка.Слова в ней разделены пробелом или запятами.В алфавитном порядке вывести на экран все гласные,которые входят в...

1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
29.05.2015, 18:26
Помогаю со студенческими работами здесь

Вывести на экран дисплея в алфавитном порядке все буквы, которое входят в массив по одному разу
Дан массив. Элементами массива являюся строчные латинские буквы. Вывести на экран дисплея в алфавитном порядке все буквы,которое входят...

Множества. Вывести на экран в алфавитном порядке все буквы, встречающиеся в тексте
1.Задан текст, состоящий из латинских букв, в конце идет точка. Вывести на экран все буквы в алфавитном порядке, встречающиеся в тексте...

Вывести в алфавитном порядке буквы, входящие одновременно во все множества
помагите пожалуйста с этой задачей: пусть д2,д4,д6-множества.составленные из букв,входящих в название четырех дней недели. вывести в...

Вывести на экран все буквы в алфавитном порядке
Есть текст с больших латинских букв,после которых стоит "." (точка). Вывести на экран в алфавитном порядке все буквы, которые входят в...

Множества. Дан текст. Вывести в алфавитном порядке все буквы текста, входящие в него не менее двух раз
Дан текст. Вывести в алфавитном порядке все буквы текста, входящие в него не менее двух раз. Текст считать из текстового файла.

0
Новые блоги и статьи
Условные типы в TypeScript
stackOverflow 17.02.2025
Условные типы - это сильное средство TypeScript, позволяющее создавать типы, которые могут менять свое поведение в зависимости от определенных условий. По своей сути, они работают подобно тернарному. . .
TypeScript и оператор infer: разбиваем Composite-типы на части
stackOverflow 17.02.2025
В TypeScript композитные типы занимают особое место - это сложные типы данных, которые создаются путем объединения более простых типов. К ним относятся массивы, объекты, кортежи (tuples),. . .
Mapped-типы в TypeScript
stackOverflow 17.02.2025
TypeScript предоставляет развитые средства для типизации данных, и одним из наиболее гибких инструментов являются mapped-типы. По сути, mapped-тип или сопоставленный тип - это способ создания нового. . .
Как вернуть энтузиазм
Uswer 17.02.2025
Приветствую тебя читатель. Сначала небольшая предыстория. Лет 5-6 тому назад появилась у меня идея автоматизации некоего процесса на работе. А так как я уже много лет увлекаюсь (не путать с. . .
Оператор satisfies в TypeScript: как он работает и где применять
stackOverflow 17.02.2025
Оператор satisfies - одна из наиболее полезных возможностей TypeScript, позволяющая проверять типы значений без изменения их исходного типа. В отличие от других операторов типизации, satisfies дает. . .
Почему могут не шифроваться русские символы в Java
Wired 17.02.2025
При разработке на Java нередко возникают сложности с шифрованием русских символов. Эта проблема особенно актуальна для разработчиков, создающих программное обеспечение для русскоязычной аудитории. . . .
Отличия ОС для x86_64 и ARM
Wired 17.02.2025
На данный момент сосуществуют две основные архитектуры процессоров - x86_64 и ARM. Эти архитектуры имеют принципиально разные подходы к организации вычислений и обработке данных, что накладывает. . .
Многопоточность в Python: как использовать Thread
bytestream 17.02.2025
Поток выполнения (thread) - это наименьшая последовательность инструкций, которая может управляться планировщиком операционной системы. Представьте себе, что ваша программа - это книга, а потоки -. . .
Как воспроизвести Race Condition в Python
bytestream 17.02.2025
В многопоточном программировании существует множество подводных камней, и одним из самых коварных является состояние гонки (Race Condition). Этот термин описывает ситуацию, когда результат выполнения. . .
Ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS"
bytestream 17.02.2025
Каждый разработчик рано или поздно сталкивается с ситуацией, когда при запуске проекта Node. js неожиданно выскакивает ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS". Это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru