tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу на паскале
Написать программу на паскале по теме: строковые величины. : путем вырезок и склеек букв получить из слова "трос" слова "сорт, рост и торс"
GLEBfy
2 22.07.2019 08:30
8
Ответы
RUSsamir
03.10.2020 10:26
Var
s : String;
i : Byte;
Begin
s:='трос';
For i:=4 downto 1 do Write(s[i]);
Writeln;
Writeln(Copy(s,2,2)+s[4]+s[1]);
Writeln(s[1]+s[3]+s[2]+s[4]);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Masha12fg
09.12.2021 18:53
Kраткое сообщение о оптической системе распознавания текста очень надо!...
obshaga2311
09.12.2021 18:54
файл, имеющий размер 11 Кбайт, передают через канал связи со скоростью 128 бит/с. Определи, какой размер файла (в байтах) можно передать за такое же время с другого соединения,...
KristinaE16
09.12.2021 18:54
Реферат учащегося по информатике имеет объем 20Кбайт. Реферат содержит 32 страницы по 23 символа в строке, мощность алфавита – 256. Сколько страниц в реферате?...
Shersher8630166
09.12.2021 18:54
Друзья передают друг другу пакет документов объёмом 30 Мбайт. Дима и Алексей используют только канал связи, не архивируя документы. Скорость передачи данных 221 бит! С. Роман...
знание333333
09.12.2021 18:55
Выберите возможности электронного процессора Верных ответов: 2 а) создание изображенийb) выполнение расчётовc) построение графикаd) создание текстов...
omarova06
06.10.2019 20:30
Запишите значение переменной s, полученное в результате работы следующей программы 1)var s,k: integer; begin s : = 0; for k : = 4 to 7 do s : = s + 8; writeln(s); end. запишите...
Karinarpro
06.10.2019 20:30
Банку требуется сообщить вкладчику,что его процент дохода при вкладе 200000 тенге составит 13,5% в год,а при сумме 350000 тенге и выше составит 14,2% запишите конструкцию if...
zoggvik13ouid1r
06.10.2019 20:40
Из каких этапов состоит создание компютерной игры?...
zooz7654Кристина
06.10.2019 20:40
Когда и кем был разработан первый массовый персональный компьютер...
kkdyming48kg
06.10.2019 20:40
Вариант 3. на¬пи¬ши¬те программу, ко¬то¬рая в по¬сле¬до¬ва¬тель¬но¬сти на¬ту¬раль¬ных чисел опре¬де¬ля-ет ми¬ни¬маль¬ное чётное число. программа по¬лу¬ча¬ет на вход ко¬ли¬че¬ство...
Популярные вопросы
Деятельность человека на севере, архангельская область...
1
Свесов мальчик определил , что стакан , заполненый водой , имеет большую массу...
1
При покупке рубашки и майки заплатили 400 рублей. майка на 40 рублей дороже...
3
Мальчик добежал до школы за 17мин обратно дошёл ща 1800сек вопрос на сколько...
3
Сколько будет 5+2+3+4 умножить на 100+77 подскажите...
3
Раскройте причино-следственные связи между сибытиями и явлениями: а) великие...
3
Составить сочинение на тему описание помещения...
2
Уменя было 10 яблок я отдал другу 8 яблок сколько яблок у меня осталось...
3
Определите, одинаковые ли массы кислорода можно получить при разложении 1...
1
Используя климатическую карту евразии: определите, как изменяется годовое...
1
s : String;
i : Byte;
Begin
s:='трос';
For i:=4 downto 1 do Write(s[i]);
Writeln;
Writeln(Copy(s,2,2)+s[4]+s[1]);
Writeln(s[1]+s[3]+s[2]+s[4]);
end.