Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
000Математик000
08.01.2022 06:53 •
Информатика
Составить программу pascal: - склеить две строки ‘язык’ и ‘программирования’ - подсчитать длину получившейся строки - в строке ‘программирование’ выделить фрагмент ‘мир’ - строку ‘бушлат’ заменить на строку ‘шлак’
Показать ответ
Ответ:
xxx5639
04.10.2020 03:54
Var
s1,s2,s3,s4:string;
begin
s1:='язык';
s2:='программирования';
s3:='бушлат';
Write(s1,' + ',s2,' = ');
s4:=s1+s2;
Writeln(s4,' (длина равна ',Length(s4),')');
Writeln(Copy(s2,8,3));
Write(s3,' -> ');
s3:='шлак';
Writeln(s3)
end.
Результаты
язык + программирования = языкпрограммирования (длина равна 20)
мир
бушлат -> шлак
0,0
(0 оценок)
Популярные вопросы: Информатика
slobodzean02
15.11.2020 22:21
2. Дополните алгоритм действий при создании правил условного форматирования, где значение ячейки больше 1000 KZT.1. Главная2.3. Создать правило4. Выбрать5. Значение ячейки6....
MokrovaDiana
02.01.2022 06:43
Дано слово информатика , напиши код программы ,чтобы получилось слово иномарка На любом языке программирования ...
qidanabala
15.05.2021 15:11
Составьте программу, которая напечатает числа в виде следующе таблицы. воспользуйтесь вложенными циклами. кол-во чисел в строке (м) и кол-во строк (n) задать с клавиатуры...
leyal
14.12.2020 08:06
Задан одномерный массив из n элементов. найти сумму всех неотрицательных элементов массива....
Aikony
14.12.2020 08:06
Задан двухмерный массив. определить, сколько раз встречается число 1 среди элементов третьей строки матрицы....
Mia871
14.12.2020 08:06
Написать программу на языке паскаль: вычислить сумму 1/2 + 1/4 + 1/6 + 1/2n...
EllaNeal
14.12.2020 08:06
1) скорость передачи данных через adsl-соединение равна 256000 бит/c. передача файла через это соединение заняла 2 минуты. определите размер файла в килобайтах....
shutnick121
27.02.2020 04:30
Паскаль, 10 класс заранее ! №1: используя операторы цикла, рассчитать сумму ряда для значений x=0.5; 0.55; 0.6; 0.65; 0.7; 0.75. включать в сумму члены ряда, большие...
annaantonova0
13.05.2022 12:39
(2) Алгоритмическая конструкция какого типа изображена на фрагменте блок-схемы? 1) линейная 2) циклическая калсаас ? 3) разветвляющаяся какая? 4) вс 3 ga 10 = (0) ассеив,...
левецинкking
13.03.2023 08:07
Розробіть код обчислення кореня квадратного із суми чисел 54,7 і 326,57...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s1,s2,s3,s4:string;
begin
s1:='язык';
s2:='программирования';
s3:='бушлат';
Write(s1,' + ',s2,' = ');
s4:=s1+s2;
Writeln(s4,' (длина равна ',Length(s4),')');
Writeln(Copy(s2,8,3));
Write(s3,' -> ');
s3:='шлак';
Writeln(s3)
end.
Результаты
язык + программирования = языкпрограммирования (длина равна 20)
мир
бушлат -> шлак