tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
За ранее ! дан текст
За ранее ! дан текст состоящий из нескольких слов : вывести на экран слова заканчивающиеся на букву я.)
qqvikaglazynova
2 10.07.2019 01:10
2
Ответы
Ботаник1111111111
02.10.2020 23:54
Var s,s1:string; p:integer;
begin
writeln('Введите строку:');
readln(s);
s1:=s+' ';
while s1<>'' do
begin
p:=pos(' ',s1);
if (p>1)and(s1[p-1]='я') then writeln(copy(s1,1,p-1));
delete(s1,1,p);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
perelyana9
14.05.2020 17:49
Язык программирования - Питон...
mmrkrolik
14.05.2020 17:49
1. Як називається модель баз даних, побудованої на основі двовимірної таблиці?а) ієрархічна; б) мережна; в) реляційна; г) структурна2. Як називається множина точок, деякі...
AlinkaMalinka233
14.05.2020 17:49
PythonДо ть, будь ласка!♡Програма має порахувати суму n чисел, перше з яких а, а кожне наступне на 3 більше від попереднього. (n і а – запитуються у користувача)....
miroslav1234
20.10.2020 18:40
составить таблицу истинности прям очень надо! Заранее огромное...
Викуля151515
01.04.2021 12:01
Навести приклад у яких випадках використовують цикли з умовою...
nurik01viper
01.04.2021 12:02
Сравните свойства алгоритма и программы: что между ними общего и чем они отличаются. Приведите примеры....
hamsterizumkin
20.05.2021 10:47
Скільки ключових полів може містити таблиця ( в числах)...
мядель
05.10.2019 02:40
Напишите код к сайту на котором будет 3 флага разных стран. используя базовые знания html css. до четверга !...
ivanm29
05.10.2019 02:40
Впрограмме «: =» обозначает оператор присваивания, знаки «+», «–», «*» и «/» – соответственно операции сложения, вычитания, умножения и деления. правила...
аы437
07.04.2020 19:58
1. Вычисление объема текстовой информации. Задача 1. Какова мощность алфавита, с которого записано сообще-ние, содержащее 2048 символов, если его объем составляет 1/512...
Популярные вопросы
Яка природна зона описана Яка природна зона описана...
1
Умоляю Биология Теория Эволюции смотрите фото...
2
При увеличении скорости телеги , совершают ли лошадь механическую работу?...
1
Укажіть суму коефіцієнтів у рівнянні реакції відновлення ферум (ІІІ)...
1
Свой литературный путь начинал как поэт: а) М. Горький; б) И. Бунин;...
3
написать твір-мініатюру (8-10реч.) на тему «Якби я потрапила до Мандрівного...
1
Округлить число до сотих 157,123...
3
1. Реши кроссворд.1. Полоса хорошо уплотнённойи выровненной земли.2....
3
Проверти правильно ли тут написано...
3
1.Выберите цифры, выделяющие обращение. Здравствуйте (1) уважаемый (2)...
1
begin
writeln('Введите строку:');
readln(s);
s1:=s+' ';
while s1<>'' do
begin
p:=pos(' ',s1);
if (p>1)and(s1[p-1]='я') then writeln(copy(s1,1,p-1));
delete(s1,1,p);
end;
end.