составить программу в которой удаляются пробелы из любой фразы
5-9 класс
|
var s:string;
i:integer;
Begin
read(s);
for i := 1 to length(s) do
if s[i]=" " then s[i]:=""
writeln(s);
End.
Другие вопросы из категории
соответствующее сообщение Является либо Не является
км, CE = 12 км, DF = 16 км. Найдите расстояния: AB, BC, CD, DE, EF.
временный диапазон, в котором часы будут бить один удар три раза подряд с интервалом в полчаса
11-30 - 12-00
12-25 - 1-45
3-00 - 3-30
12-25 - 1-15
Читайте также
Или
составьте программу, которая определяет на сколько в строке S слов, начинающихся на главную букву больше, чем в строке T
надо решить одну из них
а) определяет, есть ли в определенной строке заданный символ; б) копирует в новую строку имя и выводит его; в) выводит сначала фамилию, а затем имя. Задание 2. Составьте программу, которая в строке "Касіу Ясь канюшыну" заменяет имя "Ясь" на "Янка". Задание 3. Составьте программу, которая в строке "реки горы и болота": а) удаляет слово "горы"; б) Заменяет слово "болота" на "озера". Буду безмерно благодарна!!!
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.
2. Составить программу, которая позволяет заменить все гласные символом "*"
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.