Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
zinovevartem2017
16.08.2022 22:40 •
Информатика
Bвести предложение, состоящее из четного количества букв. bывести на экран его первую половину. (программа pascal) и ещё блок-схема(не обязательно, но желательно)
Показать ответ
Ответ:
yxurcguh
03.08.2020 13:51
Var
s: string;
begin
readln(s);
for var i := 1 to length(s) div 2 do
write(s[i]);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
дангалах
14.04.2021 01:13
1. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i = 1 while i = ...: print ( Привет! ) i += 1 2. Сколько раз будет выполнен этот цикл? i =...
Vadimqq
04.02.2021 14:07
Обработка информации, направленная на получение новой информации происходит при:...
ОляМалинка
15.04.2023 01:24
Архитектура систем, хранящих данные в виде отдельных файлов операционной системы на специально выделенном компьютере, называется ... А) файл-серверной б) трехслойной в) клиент-серверной...
swevkukviktor
04.06.2020 00:57
ОТВЕТЬТЕ В КАКИХ ОБЛАСТЯХ ИСПОЛЬЗУЮТСЯ РОБОТЫ НАПИШИТЕ 5 ОБЛАСТЕЙ...
alijonsamara200
07.04.2021 19:08
Втрех рисунках по 16 квадратов. каждый квадрат черный или белый. сколько ячеек оперативной памяти занимает двоичный код каждого рисунка?...
Kiosshi
03.04.2023 00:28
Написать программу в turbo pascal. напишите программу генератором случайных чисел генерируется последовательность 50-ти случайных чисел из диапазона [-10; 20]. вычислить сумму...
dedov05
07.12.2020 09:40
Напишите сколько сможете программ для решения вот таких : if1. дано целое число. если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. вывести...
krisdenya2005
10.10.2021 12:33
Лена скачивает дистрибутив ос linux с зарубежного сайта-репозитория, пользуясь односторонним каналом цифровой передачи данных через телевизионное эфирное вещание, обеспечивающим...
safaannainfinity
10.10.2021 12:33
12 апреля 1961 года юрий гагарин осуществил первый космический полёт. доступность да своевременность,точность,устойчивость ответь на вопросы является ли эта информация для тебя...
Zacloock
16.02.2022 12:10
В одном подъезде пятиэтажного дома 15 квартир, в каждой квартире живет некоторое количество человек. Подсчитать количество жильцов на каждом этаже и в подъезде в целом, максимальное...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s: string;
begin
readln(s);
for var i := 1 to length(s) div 2 do
write(s[i]);
end.