Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kruglov428
05.10.2022 02:51 •
Другие предметы
Из вводимого с клавиатуры слова вырезать каждую третью букву (программа на Паскале)
Показать ответ
Ответ:
kkhristinka1
16.04.2019 23:20
program aa;
var a:string;
k,x: integer;
begin
readln(a);
k:=length(a);
x:=3;
while x<=k do
begin
a[x]:=' ';
x:=x+3;
end;
writeln(a);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
помогитесдомашкой3
20.12.2021 02:27
Сэкзаменом по анатомии. а то изнасилуют если не ....
Арина7405
22.07.2021 14:47
20 ів треба написати твір на іспанській мові на тему: que cualidades debe tener un amigo verdadero...
HLNLZ
16.06.2020 13:42
Sõz kõrki-maqol mavzusida matn tuzing...
БоняЛизякин
13.04.2021 19:18
Найди основную мысль этого сочинения: 1. Произведения устного народного творчества - легенды, предания, былины, а также пословицы и поговорки уникальны. Они - кладезь народной мудрости....
rederemin2006
03.08.2020 08:59
наведіть кілька аргументів на підтвердження істинності судження Античність-колиска європейської культури ...
Bairachock
19.07.2021 03:15
Объясните почему в 10-13 вв. в Заподной Европе значительно увеличилось количевство городов?...
нур821
14.12.2020 20:33
Пути расселения древних славян...
leramailvorob
19.02.2023 16:56
3. Найди свойства снега. Вычеркни лишнее. Прозрачный, не имеет формы, бесцветный, текучий, растворительне имеет запаха....
ulyalyas
19.02.2023 16:56
Задание 1. Спишите предложения, вставьте пропущенные буквы, расставьте недостающие знаки препинания. Укажите, чем выражены сказуемые. Выделите пассивные конструкции. Укажите морфологические...
Yaklaura
13.09.2020 19:37
Нанесите на контурную карту географические объекты таблицы 1, применяя условные знаки....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:string;
k,x: integer;
begin
readln(a);
k:=length(a);
x:=3;
while x<=k do
begin
a[x]:=' ';
x:=x+3;
end;
writeln(a);
readln;
end.