Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
alexweber2016
03.10.2022 01:15 •
Информатика
Составить программу в паскале! дан текст. вывести на экран слова, содержащие n букв
Показать ответ
Ответ:
Ucoba
28.09.2020 14:58
//Pascal ABC.NET 3.1 сборка 1219
Var
s:string;
n:integer;
begin
readln(s);
readln(n);
var ars:=s.Split;
foreach var i in ars do
if length(i)=n then writeln(i);
end.
Пример ввода:
Ехал грека через реку видит грека в реке рак
5
Пример вывода:
грека
через
видит
грека
0,0
(0 оценок)
Популярные вопросы: Информатика
milenasalikova
20.11.2020 10:22
Операционная система это- 1 совокупность основных устройств компьютера 2 программная среда, определяющая интерфейс пользователя 3 совокупность программ, используемых...
mi1980
20.11.2020 10:22
Составить программу, которая запрашивает ввод температуры тела человека и определяет, здоров он или болен (здоров при 36...
Kasseno4ka
19.11.2022 15:35
На какие основные классы принято разделять по? ...
lmaxluk099
04.03.2021 07:22
Модем який передає дані 30000 біт/с. може передати файл (фотографію) розміром 1 М байта за...
annavatolina20
28.02.2020 06:10
ЗАДАНИЕ °Написать программу на ЯП Pyton: определить, является ли введенное целое число трехзначным и вывести соответствующее сообщение . ПРИМЕР ВЫПОЛНЕНИЯ ЗАДАНИЯ (другая...
Единорог20001
11.05.2021 17:07
Определите что будет напечатано после выполнения следующего фрагмента программы: a:=4; a:=a+18; b:=-2*a; if b+30 a then c:=2-3*b; if b a then write(a); writeln (c);...
zai4onok1988
29.08.2021 20:42
1. Какой тип диаграммы больше подходит для демонстрации соотношения между частями выборки? 1) график 2) круговая диаграмма 3) столбчатая диаграмма 4) гистограмма 2....
Гузеля2006
29.08.2021 20:42
Треба скласти кросворд з информатики на 10 запитань ...
angellacat26ozuxwi
14.11.2020 16:50
Построить график кусочно-заданной функции, отобразить ветви разными цветами и маркерами. Пример программы: x1=0:0.01:1; y1=asin(x1-1); plot(x1,y1, r*- ); hold on x2=1:0.01:pi/2;...
koi4
04.03.2023 11:30
Сколько графических файлов из 128 цветов размером 100*100 точек может поместиться на dvd диске...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var
s:string;
n:integer;
begin
readln(s);
readln(n);
var ars:=s.Split;
foreach var i in ars do
if length(i)=n then writeln(i);
end.
Пример ввода:
Ехал грека через реку видит грека в реке рак
5
Пример вывода:
грека
через
видит
грека