Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Составить блок-схему алгоритма решения задачи и программу с использованием подпрограммы Исходные данные для вычислений с использованием подпрограмм. https://www.cyberforum.ru/ turbo-pascal/ thread739736.html Turbo Pascal непростые задачки
помогите написать хотя бы несколько!я в этом новичок,мало что понимаю дело в том что все задания связаны между собой,исходя из одного надо написать другой,кроме задания 2.1 Задание 2.1. Необходимо написать Windows Forms приложение, содержащие элементы для ввода текстовых полей: Фамилия, Имя, Отчество, год рождения; кнопку, по нажатию на которую выводится сообщение вида: ...
Turbo Pascal Где достать примеры программ на Turbo Vision? https://www.cyberforum.ru/ turbo-pascal/ thread739697.html
Всю сеть обыскал, но смог найти только парочку программ на Turbo Vision. Вдруг у кого-то есть примеры?
Turbo Pascal Структурированные типы данных – записи При определении рейтинга учащихся 9-х классов в первой группе баллов учитываются итоговые оценки по пяти основным предметам: алгебре, геометрии, физике, информатике, русскому-языку. Дан список класса с указанием фамилии, имени ученика, пяти предметов и соответствующих оценок по данным предметам для этого ученика. Определить: а) фамилии отличников, то есть тех учеников, у которых по всем пяти... https://www.cyberforum.ru/ turbo-pascal/ thread739686.html
Дано слово w1 и строка s. Найти в строке s такое слово w2 Turbo Pascal
Дано слово w1 и строка s. Найти в строке s такое слово w2, чтобы любая гласная встречалась хотя бы в одном из слов w1 или w2.
Turbo Pascal Пусть дан файл целых чисел https://www.cyberforum.ru/ turbo-pascal/ thread739645.html
Пусть дан файл целых чисел. Создайте файл вещественных чисел, значениями которого будут средние арифметические значения каждой пятёрки подряд идущих чисел. Последняя группа чисел может содержать меньше пяти значений.
Turbo Pascal Вывести график функции у кого есть паскаль? немоглибы вы ввести этот програмный код uses crt,Graph; var x0,y0,x1,y1,k: integer; x,y: real; grDriver: Integer; grMode: Integer; ErrCode: Integer; begin grDriver := detect; InitGraph(grDriver, grMode,'C:\Program Files\TP\BGI'); https://www.cyberforum.ru/ turbo-pascal/ thread739640.html Turbo Pascal информационный бюллетень
Привет всем=) Помогите пожалуйста, сделала часть кода, остальное не могу понять как, вот такая глупая(( Вот само задание: Во время предвыборной кампании проводится регистрация кандидатов в депутаты. Каждый кандидат, подавая заявление на регистрацию, указывает номер округа, в котором он собирается баллотироваться, наименование партии, которую он представляет, свой возраст и профессию....
Turbo Pascal Вычислить значение выражения Написать программу на Паскале и нарисовать блок-схему Помогите пожалуйста, завтра сдать нужно, а у меня не получается. Нужно сделать в двух вариантах, у меня даже образцы есть. https://www.cyberforum.ru/ turbo-pascal/ thread739630.html Turbo Pascal Соберите все сведения об учениках 9-х и 10-х классов, упорядочив их по году обучения и букве. https://www.cyberforum.ru/ turbo-pascal/ thread739575.html
Сведения об ученике состоят из его имени и фамилии, названия класса (года обучения и буквы), оценок, полученных учеником за последнюю четверть. Пусть дан массив, содержащий сведения об учениках школы (10 человек). Соберите все сведения об учениках 9-х и 10-х классов, упорядочив их по году обучения и букве.
Turbo Pascal Найти сумму отрицательных элементов массива, которые расположены на местах с номерами, большими К
1. Дан одномерный массив, который содержит не более 20 вещественных чисел. Найти сумму отрицательных элементов, которые расположены на местах с номерами, большими К. Если можно то попроще заранее спасибо БЕЗ RANDOMIZE!!!
Turbo Pascal Найти среднее арифметическое элементов массива 2. Дан одномерный массив, который содержит не более 7 целых чисел. Найти среднее арифметическое элементов. Если можно попроще заранее спасибо) БЕЗ RANDOMIZE!!! https://www.cyberforum.ru/ turbo-pascal/ thread739548.html
Фрилансер
3418 / 2815 / 3000
Регистрация: 08.02.2012
Сообщений: 8,574
Записей в блоге: 1
20.12.2012, 15:07 0

Необходимо из строки символов вывести на экран символ с максимальным кодом по таблице ASCII - Turbo Pascal - Ответ 3889479

20.12.2012, 15:07. Показов 2193. Ответов 1
Метки (Все метки)

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

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
Var s:string;
    ch:char;
    i:byte;
Begin
    write('Введите строку символов: ');readln(s);
    ch:=s[1];
    For i:=2 to Length(s) do
     if ord(s[i])>ord(ch) then ch:=s[i];
    writeln('Max символ = "',ch,'" его код = ',ord(ch));
    readln;
End.


Вернуться к обсуждению:
Необходимо из строки символов вывести на экран символ с максимальным кодом по таблице ASCII Turbo Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.12.2012, 15:07
Готовые ответы и решения:

Необходимо из строки символов вывести на экран символы с минимальным и максимальным кодами по таблице ASCII
Доброго времени суток. Помогите пожалуйста. Необходимо из строки символов вывести на экран символы...

Программа выводит на экран только один символ из строки с максимальным кодом символа
Помогите написать 2 программы. 1.Пользователь вводит строку. Программа выводит на экран только...

Вывести на экран таблицу символов в формате «ASCII-код – символ»
Не понимаю, как делать это задание, уже весь интернет перерыл.

Как использовать charsToTrim с ASCII кодом? или как удалить множество символов из строки используя код ASCII
Как использовать charsToTrim с ASCII кодом? или как удалить множество символов из строки используя...

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

Рекурсия: Для диагональных элементов матрицы рекусивно найти и вывести символ с наибольшим ASCII кодом
1.Используя генератор и ручное редактирование создать матрицу A размеронсти NxN строчных русских и...

Изменение символов строки на K позиций по таблице ASCII
Как можно реализовать изменение символов строки на K позиций по таблицы ASCII?

Дан символ С. Вывести два символа, стоящие перед ним в кодовой таблице ASCII
20) Дан символ С. Вывести два символа, стоящие перед ним в кодовой таблице ASCII

Ввести с клавиатуры строку символов. На новой строке вывести два символа: с max и min ASCII кодом
Здравствуйте!!! Код работает нормально,но он в конце выводит числа min и max) а надо что бы...

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