Как ввести последовательность символов (тип Char) и завершить ввод по клавише "Enter"?

@DyneX · Регистрация: 03.11.2014

Author24 — интернет-сервис помощи студентам

Как ввести последовательность символов (тип Char) и завершить ввод по клавише "Enter"?( массивов не использовать)

@Joy · 13.11.2014, 12:34

полностью задание напишите.

@DyneX · 13.11.2014, 12:44 **[ТС]**

В одной строке экрана вводится последовательность символов(тип char). Ввод завершается нажатием клавиши "Enter". Распечатать символы, удалив группу символов, заключённые в скобки. Массивов не использовать.

@Puporev · 13.11.2014, 12:47

Задача явно из Паскаля, где есть Crt и readkey, но можно и в Делфи изловчиться.
Тебе нужно в консоли или на форме?

@DyneX · 13.11.2014, 12:51 **[ТС]**

Только консоль

@Puporev · 13.11.2014, 13:25

Ввод.

Delphi

program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
var c:char;
    s:string;
begin
writeln('Vvedite simvoly, okonchanie Enter');
s:='';
repeat
read(c);
if c<>#13 then s:=s+c
else writeln;
until c=#13;
readln;
readln
end.

@NIKOLAYY · 13.11.2014, 13:37

Сообщение от DyneX

Распечатать символы, удалив группу символов, заключённые в скобки.

Удалить можно так:
1. Функция Pos на поиск вхождения (
2. Функция Pos на поиск вхождения )
3. Функция Delete(Stroka, n, k); //где строка- это твоя строка n = вхождение (, k = кол-во символов
4. Группа символов заключённые в скобки- УДАЛЕНА.

@DyneX · 13.11.2014, 14:29 **[ТС]**

После двух введённых символов программа закрывается.

@Puporev · 13.11.2014, 14:32

Так ты вводи символы в одну строку, надоест, нажми Enter.

@DyneX · 17.11.2014, 14:47 **[ТС]**

Строковый тип является массивом.

@Puporev · 17.11.2014, 14:51

Так сделай только ввод и не сохраняй последовательность, это же пример программы.

Добавлено через 45 секунд
Ты же написал только часть задания.

Добавлено через 44 секунды

Сообщение от DyneX

Строковый тип является массивом.

А если такой умный то чего же с протянутой рукой?

@DyneX · 17.11.2014, 16:11 **[ТС]**

Извиняюсь, просто по заданию мне сказали, что строковый тип нельзя использовать.

@Joy · 22.11.2014, 04:07

В итоге массивы нельзя, строки нельзя. Напрямую читаем с файла и с ним работаем?

Добавлено через 27 минут

Delphi

program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
var
  c:char;
  b:boolean;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  b:=false;
  write('BBeguTe TeKcT:');
  while not eoln do begin
    read(c);
    if c='(' then b:=true;
    if not b then write(c);
    if c=')' then b:=false;
  end;
  readln;readln;
end.

@DyneX 0 / 0 / 0 Регистрация: 03.11.2014 Сообщений: 13
	17.11.2014, 14:47 [ТС]	10
	Строковый тип является массивом. 0

@Joy 2386 / 1298 / 1492 Регистрация: 29.08.2014 Сообщений: 4,661
	13.11.2014, 12:34	2
	полностью задание напишите. 0

@DyneX 0 / 0 / 0 Регистрация: 03.11.2014 Сообщений: 13
	13.11.2014, 12:44 [ТС]	3
	В одной строке экрана вводится последовательность символов(тип char). Ввод завершается нажатием клавиши "Enter". Распечатать символы, удалив группу символов, заключённые в скобки. Массивов не использовать. 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	13.11.2014, 12:47	4
	Задача явно из Паскаля, где есть Crt и readkey, но можно и в Делфи изловчиться. Тебе нужно в консоли или на форме? 0

@DyneX 0 / 0 / 0 Регистрация: 03.11.2014 Сообщений: 13
	13.11.2014, 12:51 [ТС]	5
	Только консоль 0

@NIKOLAYY 843 / 738 / 342 Регистрация: 22.09.2012 Сообщений: 5,034
	13.11.2014, 13:37	7
	Сообщение от DyneX Распечатать символы, удалив группу символов, заключённые в скобки. Удалить можно так: 1. Функция Pos на поиск вхождения ( 2. Функция Pos на поиск вхождения ) 3. Функция Delete(Stroka, n, k); //где строка- это твоя строка n = вхождение (, k = кол-во символов 4. Группа символов заключённые в скобки- УДАЛЕНА. 1

@DyneX 0 / 0 / 0 Регистрация: 03.11.2014 Сообщений: 13
	13.11.2014, 14:29 [ТС]	8
	После двух введённых символов программа закрывается. 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	13.11.2014, 14:32	9
	Так ты вводи символы в одну строку, надоест, нажми Enter. 1

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.11.2014, 14:51	11
	Так сделай только ввод и не сохраняй последовательность, это же пример программы. Добавлено через 45 секунд Ты же написал только часть задания. Добавлено через 44 секунды Сообщение от DyneX Строковый тип является массивом. А если такой умный то чего же с протянутой рукой? 0

@DyneX 0 / 0 / 0 Регистрация: 03.11.2014 Сообщений: 13
	17.11.2014, 16:11 [ТС]	12
	Извиняюсь, просто по заданию мне сказали, что строковый тип нельзя использовать. 0

	22.11.2014, 04:07