![]() |
|
Другие темы раздела | |
Составить блок схему к готовому коду 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 |
![]() 6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
|
|
29.05.2015, 18:26 | 0 |
Множества: выделить из строки неповторяющиеся буквы, и вывести их на экран в алфавитном порядке - Pascal - Ответ 768972229.05.2015, 18:26. Показов 1226. Ответов 1
Метки (Все метки)
![]() Решение
Выделить из строки неповторяющиеся буквы и вывести их на экран
Вернуться к обсуждению: Множества: выделить из строки неповторяющиеся буквы, и вывести их на экран в алфавитном порядке Pascal
1
|
29.05.2015, 18:26 | |
Готовые ответы и решения:
1
Множества/строки: в алфавитном порядке напечатать все строчные русские гласные буквы, входящие в текст
|
29.05.2015, 18:26 | |
Помогаю со студенческими работами здесь
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". Это. . .
|