сервис вопросов и ответовПомогите сделать в pascal abc. Дана строка.Укажите те слова, которые содержат хотя бы одну букву к.
5-9 класс|
|
Tysia96
30 июля 2016 г., 22:04:26 (7 лет назад)
Doomm
30 июля 2016 г., 23:08:04 (7 лет назад)
var
s: string;
begin
readln(s);
foreach k: string in s.Split(' ') do
if (pos('к', k) > 0) then
writeln(k);
end.
Ответить
Другие вопросы из категории
СРООООООООООООЧНОООООООООООО
Логические данные - это:
денежные данные
текст
числа
одно из двух значений
Читайте также
Помогите по программе paskal : 1.дано целое число.напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
Запись некоторого натурального числа Х в шестнадцатеричной системе счисления имеет ровно три значащих разряда. Это число увеличили в два раза, и оказалось,
что запись получившегося числа У в шестнадцатеричной системе также имеет ровно три значащих разряда, причем сумма цифр шестнадцатеричной записи исходного числа Х равна сумме цифр шестнадцатеричной записи полученного числа У. Сколько существует таких чисел Х,
которые удовлетворяют указанным условиям и при этом содержат хотя бы одну цифру 2 в своей шестнадцатеричной записи? В ответе укажите целое число.
Сделайте пожалуйста на Паскале ABC
Дано слово "Процессор". Используя буквы входящие в это слово в качестве алфавита(буквы могут быть только прописными), были составлены все возможные слова
из четырех букв, такие что соседние буквы в каждом слове различны и все слова отличаются друг от друга хотя бы одной буквой. Слова, состоящие из одинаковых букв, но стоящих в разном порядке считаются различными. Сколько получилось таких слов? В ответе укажите целое число.
Можно пожалуйста с подробным решением?
1) дано четырёхзначное число. вывести максимальную и минимальную цифру. pascal abc
2) дано четырёхзначное число. Что больше: произведение цифр числа или их утроенная сумма. pascal ABC
Помогите!!! Срочно!!! (Pascal ABC)
В один из летних дней Аркадий со своими родителями отправился в
автомобильное путешествие. Он очень надеялся, что за городом им удастся
избежать ненавистных пробок. Но, увы, уже через час они попали в затор.
Аркадий загрустил и задумался о том, с какой скоростью они могли бы
ехать, если бы не было пробки... Участок дороги, на котором они сейчас
находятся, — однополосный. А это значит, что обгонять едущие впереди
машины не представляется возможным. Т. е. какой бы мощной машина ни
была, она все равно не сможет ехать быстрее, чем машина впереди неё.
Аркадий хорошо разбирается в машинах и поэтому знает максимальные
скорости тех машин, которые едут впереди. Теперь он хочет понять, с
какой максимальной скоростью могла бы ехать каждая машина на данном
участке.
ВХОДНЫЕ ДАННЫЕ
В первой строчке дано число N (1 ≤ N ≤ 200) —
количество машин в пробке. В следующих N строчках записано по одному
целому числу в каждой, причем в i-й строчке записана скорость i-й
машины. Скорость каждой из машин не превышает 300. Считается, что (i + 1)-я машина едет за i-й, а первая машина может ехать со своей максимальной скоростью.
ВЫХОДНЫЕ ДАННЫЕ
Выведите N чисел — скорости машин, с которыми они могли бы ехать на данном участке.
ВХОДНЫЕ ДАННЫЕ
2
80
100
ВЫХОДНЫЕ ДАННЫЕ
80 80
Вы находитесь на странице вопроса "Помогите сделать в pascal abc. Дана строка.Укажите те слова, которые содержат хотя бы одну букву к.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.