Форум программистов, компьютерный форум CyberForum.ru Форум программистов | Компьютерный форум | Форум web-программистов | Форум по электронике и бытовой технике | Форум о софте | Научный форум | Карьера и бизнес
CyberForum.ru - форум программистов и сисадминов > > >
Восстановить пароль Регистрация

Ответ Создать новую тему
 
olya1995
Новичок
0 / 0 / 0
Регистрация: 13.03.2013
Сообщений: 13
23.04.2013, 17:02
  #1
составить программу вычеркивающую из слова х буквы стоящие на нечетных местах
AdAgent
Объявления
23.04.2013, 17:02
m-ch
Форумчанин
2582 / 386 / 38
Регистрация: 25.02.2011
Сообщений: 500
23.04.2013, 17:15
  #2
Код QBasic/QuickBASIC
1
2
3
4
5
6
7
INPUT x$
FOR i = 1 TO LEN(x$)
  m$ = MID$(x$, i, 1)
  IF i MOD 2 THEN m$ = ""
  y$ = y$ + m$
NEXT i
PRINT y$
Вариант2
Код QBasic/QuickBASIC
1
2
3
4
5
INPUT x$
FOR i = 2 TO LEN(x$) STEP 2
  y$ = y$ + MID$(x$, i, 1)
NEXT i
PRINT y$
Yandex
Объявления
23.04.2013, 17:15
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему

Похожие темы
Тема Раздел Автор Дата
QBasic Строковые величины: заменить в слове X все гласные буквы на "O", а согласные на "C"
составить программу ,заменяющую в слове X все гласные буквы на "O" ,а согласные на "C".
QBasic olya1995 18.07.2014 13:48
QBasic Строковые Величины: какая из букв встречаются в слове X чаще
Составе программу ,выясняющую какая из букв (первая или последняя)встречаются в слове X чаще.
QBasic kubinksy 18.07.2014 12:16
Delphi Строковые величины
Для каждого из указанных видов текста составить программу по выполнению следующих действий: Для текста, состоящего из слов, разделенных пробелами, выполнить: поиск номера самого длинного...
Delphi для начинающих anya555 26.09.2013 03:08
Pascal ABC Строковые величины
В заданном тексте удалить гласные буквы и подсчитать число удаленных символов
Pascal ABC katrinus 15.09.2013 07:56
QBasic Строковые величины: можно ли из букв, входящих в слово Х, составить слово Y
составить программу ,проверяющую ,можно ли из букв, входящих в слово Х ,составить слово Y( буквы можно переставлять , и каждую букву можно использовать более одного раза)
QBasic olya1995 16.04.2013 21:44
QBasic Дано целое число и набор из N чисел - значений некоторой величины. Найти среднее значение этой величины
Minmax21. Дано целое число N (>2) и набор из N чисел - значений некоторой величины, полученных в N опытах. Найти среднее значение этой величины. При вычислении среднего значения не учитывать...
QBasic gena93 15.05.2012 15:39
Строковые величины
Помогите зделать задачу отблагодарю на WebMoney пліз по теме "Рядкові величини" Умова: Ввести довільний текс. У данному тексті визначити, скільки разів зустрічаеться буквосполучення ТО
Заказать программу Дима Пурчела 16.01.2012 12:14
QBasic Строковые функции
Нужно вставить новое слово в текст из 3-х слов после первого слова. Помогите!!!))) Пожалуйста))))
QBasic feniks01-92 23.12.2010 21:16
Опции темы

Текущее время: 12:48. Часовой пояс GMT +4.

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.