Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
принцеска005
26.05.2022 17:52 •
Информатика
Нужно решить 1) дана строка, удалить все повторы последнего в ней (12431531-> 243531) 2) дана строка, содержащая числа, разделенные пробелами. найти максимальное число
Показать ответ
Ответ:
KaguraChan
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 оценок)
Популярные вопросы: Информатика
You666
26.01.2020 11:00
Вводится список из n элементов. проверить в нем наличие нулевого элемента. (java) (комбинация цифр любая)...
4553234
15.01.2022 13:35
1.Каково назначение утилит? Поясните назначение программ системного уровня. Приведите примеры подобных программ. 2.Перечислите программы, которые относят к прикладному...
filin781
20.07.2020 07:53
За правилами виконання VB без пробілів записати вираз d=cos x + tg x - 2sin x...
moderator14
03.01.2020 05:24
Program1.pas(6) : встречено writeln , а ожидалось ; program калькулятор; var a,b,c: integer; begin writeln ( введите число a: ); readln(a) writeln; ( введите число b:...
100116
21.01.2022 19:08
70 ! вопросы и : 1. какие операции можно производить над строковыми величинами? 2.объясните механизм работы известных вам операций над строковыми величинами. подтвердите...
132427
09.03.2020 08:54
Выполнить указанные переводы чисел из одной системы в другую: 1)5b.4(16)=x(10) 2)72.885(10)=x(10) 3)355.015625(10)=x(8) 4)735.125(10)=x(16) пошаговое обьяснение...
Чарос0302
20.05.2022 16:39
Составить программу вычесления выражения y= a+b в программе паскаль...
мага05051
18.06.2022 04:48
Записьповтори k разкоманда1 команда2 командазконецозначает. что последовательность команд команда1 команда2 командаз по-вторится k раз.чертёжнику был дан для исполнения...
СветаТихая
18.06.2022 04:48
Дано двузначное число. получить число, образованное при перестановки цифр заданного числа числа c#...
Alisacollins1
09.11.2021 01:18
Игрушечная машина каната при столкновении с препятствием двигается назадинформатика 5 класс алгоритмы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
№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