Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ZayacZnaniy
15.11.2022 23:07 •
Информатика
Составьте программу, с которой из слова железнодорожник получаются слова: донор колено крокодил (язык pascal)
Показать ответ
Ответ:
tema30102008
08.09.2020 11:59
// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
var s:='ЖЕЛЕЗНОДОРОЖНИК';
Writeln(s[8],s[9],s[6],s[7],s[10]);
Writeln(s[15],s[7],s[3],s[4],s[6],s[7]);
Writeln(s[15],s[10],s[7],s[15],s[7],s[8],s[14],s[3])
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ola1325
27.11.2021 22:38
Определить истинность утверждений: третья буква латинского алфавита ,буква b...
CrasH1990
21.07.2022 14:26
Если поменять буквы местами у слов: маяк-,кукла-,комар-,соринка-,водопад-....
гол38
21.07.2022 14:26
Укажи минимальный объём памяти (в битах), достаточный для хранения любого растрового изображения размером 46×46 пикселя, если известно, что в изображении используется...
asadhfdgj
17.10.2022 18:47
Составьте программу в паскаль, вводящую true, если высказывание является истинным, и false в противном случае. а) сумма цифр трёхзначного числа х является чётным числом....
ангелина67890
11.09.2022 01:18
Вязыке поискового сервера для обозначения логической операции или используется символ | , а для обозначения логической операции и — символ & . в таблице запросы...
syrlybai056
08.06.2020 01:24
Чим відрізняються лінійні та циклічні алгоритми? ...
ann0706kol
27.04.2021 14:24
Продолжение к документы под именем формулы выражения допишите следующие ...
nastya05112
11.03.2023 09:21
Чи можна змінювати звуки в середовищі скретч? як це зробити? наведи приклади....
nikitaursu11
04.06.2022 20:41
Создайте документ формулы 1 и напишите следующую формулу...
FrozeFre
10.03.2020 19:35
1. Дополни предложение, в пустые места впиши (скопируй) недостающие слова из списка: галерея, Вставка/Рисунок/Картинки, Вставка/Рисунок/Из файла, Вид/Панели инструментов/Настройки...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var s:='ЖЕЛЕЗНОДОРОЖНИК';
Writeln(s[8],s[9],s[6],s[7],s[10]);
Writeln(s[15],s[7],s[3],s[4],s[6],s[7]);
Writeln(s[15],s[10],s[7],s[15],s[7],s[8],s[14],s[3])
end.