Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
kiranovm14
08.02.2021 06:14 •
Информатика
Нужно решить 1) дана строка, удалить все повторы последнего в ней (12431531-> 243531) 2) дана строка, содержащая числа, разделенные пробелами. найти максимальное число
Ответ:
burdyugova48
06.10.2020 12:15
// PascalABC.NET 3.2, сборка 1449 от 23.05.2017
// Внимание! Если программа не работает, обновите версию!
№1
begin
var s:=ReadlnString;
var c:=s.Last;
s:=s.Replace(c,'')+c;
Writeln(s)
end.
Пример
12431531
243531
№2
begin
Writeln('Max=',ReadlnString.ToIntegers.Max);
end.
Пример
234 -23 0 23 32 753 -123134 1523 14
Max=1523
0,0
(0 оценок)
Популярные вопросы: Информатика
Кея1563
15.01.2022 06:12
Написать программу на языке паскаля. напишите программу, определяющую, лежит ли точка а (ха, уа) на окружности х2+у2=r2, на ней или под ней....
nikita6011
01.05.2023 20:25
При регистрации в компьютерной системе каждому пользователю выдается пароль, состоящий из 6 символов и содержащий только символы из 7-ми буквенного набора а,в, е,к,м,н,о. в базе данных...
Masha3334
10.01.2023 18:49
Какая формулировка верна для описания файловых вирусов?...
Rina666
17.04.2023 18:38
Напишите программу, определяющую, лежит ли точка а (ха,уа) на прямой y=kx+l, над ней или под ней...
miha115
17.04.2023 18:38
Цветное ( с палитрой 32 цветов) растровое графическое изображение имеет размер 1600x1200 пикселей. какой объем памяти займет это изображение?...
natalijamatijch
17.04.2023 18:38
Написать программу, которая по последней цифре числа позволяет определить последнюю цифру его квадрата....
shchepelevason
22.08.2021 02:24
Сделайте нужно сделатьпрезентацию на тему зоопарк в презентации должно быть 1 дизайн 2 скачать звуковой файл для каждой зверюшки 3 анимация,слайдов не менее 10...
Dave999
22.08.2021 02:24
Найдите p прямоугольника со стороной 1см и 1мм...
Pomogihd
07.11.2020 06:01
Укажите верное описание целочисленного массива mass, состоящего из 10 элементов. интервал значений элементов [0; 100] 1)var mass: array of integer; 2)var mass: array[1..10] of integer;...
vikasaaan
24.03.2020 03:08
2. что такое атеросклероз? 3. объясните, почему так важно сердечно-сосудистыхзаболеваний....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
№1
begin
var s:=ReadlnString;
var c:=s.Last;
s:=s.Replace(c,'')+c;
Writeln(s)
end.
Пример
12431531
243531
№2
begin
Writeln('Max=',ReadlnString.ToIntegers.Max);
end.
Пример
234 -23 0 23 32 753 -123134 1523 14
Max=1523