PascalABC.NET 3.2: 1. begin write(ReadString.indexof(':')) end. Пример ввода: 1234:56 Пример вывода: 4
2. begin write(readString.ToWords.Select(x->x[1]).JoinIntoString) end. Пример ввода: Как любила язвить королева, собаки апплодировали Пример вывода: Клякса 3. begin write(readString.ToWords.Select(s->Length(s)).Max) end. Пример ввода: Не хочу учиться хочу жениться Пример вывода: 8 4. Если там нет знаков препинания: begin write(readString.ToWords.Select(s->ReverseString(s)).JoinIntoString(' ')) end. Если там есть знаки препинания, которые надо оставить на месте, то настолько же короткого решения мне не придумалось, можно так: begin var str := readString + ' '; var m := ''; for var i := 1 to str.Length do if str[i].IsLetter then m += str[i] else begin write(ReverseString(m), str[i]); m := ''; end; end. Пример ввода: амар алым умам Пример вывода: рама мыла маму
Информатика - наука об информации и автоматизации информационных процессов. Информация - это новости, новые факты, знания про объекты и явления окружающей среды. Компьютер - устройство или система выполнять заданную чётко определённую изменяемую последовательность операций. Файл - это упорядоченная совокупность данных на внешнем носителе которая имеет имя которое операционная система обрабатывает как единое целое. Текстовой редактор - это самостоятельная компьютерная программа или компонент программного комплекса. Графический редактор - это программа позволяющая создавать, просматривать, обрабатывать и редактировать цифровые изображения на компьютере.
0.187 = 1 · 10⁻¹ + 8 · 10⁻² + 7 · 10⁻³
Объяснение:
Поехали!
Развернуто значит записать сумму всех произведений чисел, которые должны стоять на своей позиции.
Значит
0.187 = 1 · 10⁻¹ + 8 · 10⁻² + 7 · 10⁻³
Все