tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу в pascal,
Составить программу в pascal, которая из слов "финал","урок","турист","","окно","линия" составляет и выводит слово "футбол". : 3
danilohca
1 12.08.2019 21:30
1
Ответы
nvanislavskaya
04.10.2020 14:33
// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!
begin
var a:=Arr('финал','урок','турист','балет','окно','линия');
a.Select(c->c[1]).Println
end.
Результат
футбол
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Bog5635545
23.09.2019 05:40
Сколько чисел от 1 до 100 включительно удовлетворяют такому условию: ((x mod 10 = 7) and (x div 10 mod 10 5)) or ((x mod 2 = 0) and (x...
KendallK
23.09.2019 05:40
Напишите программу , которая в последовательности 10-ти натуральных чисел определяет максимально число, оканчивающееся на 4. если таких чисел нет , вывести (no)....
mahachkala1
23.09.2019 05:40
Напишите программу , которая в последовательности 9-ти целых чисел определяет разницу наибольшего и наименьшего чесл...
пишитеответ
28.07.2019 08:50
Впроцессе преобразования растрового графического файла количество цветов уменьшилось с 256 до 8 . во сколько раз уменьшился информационных объем файла?...
AnutaNikishina
06.05.2019 20:54
Дан код с номером. определи, какой это символ: или изображаемый. код с номером 70....
Natte1
06.05.2019 20:54
Дан код с номером. определи, какой это символ: или изображаемый.код с номером 70....
ДинаВаитова
06.05.2019 21:05
Мне надо подсчитать количество повторяющихся цифр в числе (используя python) например н = 22312 и число 2 повторяеться 3 раза...
marijasoe19gmailcon
25.04.2020 00:08
Что определяет для массива X[1..n, 1..m] следующий алгоритм S := 0; For i := 1 to n do For j := 1 to m do If X[i, j ] 0 then S := S + X[i, j]; a. минимальный элемент...
ellaakobyan
25.04.2020 00:07
Зачеркните неверно записанные операторы...
Марина24102008
24.04.2020 23:48
Дополнительные предложения, перетащив слово из ячеек...
Популярные вопросы
Ассоциативный куст спешите заголовок прочитанного стихотворения...
3
Найдите а, если S = 24, h= 8...
2
Заповніть таблицю користуючись текстом підручника...
2
До якого класу неорганічних сполук належать речовини: Н2РО4,...
2
2. Ты хочешь изучить животный мир Австралии. Составь план своего...
2
Як біблійна історія про творення світу знайшла своє відображення...
2
Мой любимый вид спорта про каратэ на английском языке...
1
Дайте определение воднным словам Казалось ,Думаю...
3
,решить эту задачу на логику. Все никак не могу понять,как сделать....
1
Найди значения х у, при которых верно равенство: Верных ответов:...
1
// Внимание! Если программа не работает, обновите её версию!
begin
var a:=Arr('финал','урок','турист','балет','окно','линия');
a.Select(c->c[1]).Println
end.
Результат
футбол