Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
clopjkeee
0 / 0 / 0
Регистрация: 17.03.2011
Сообщений: 7
1

Обработка символьных данных

27.04.2011, 22:46. Просмотров 745. Ответов 1
Метки нет (Все метки)

Написать программу, которая читает с клавиатуры строку символов, преобразует ее и выводит результат на дисплей. Длина строки не вводится, а определяется. Если строка не удовлетворяет условию, выдать сообщение.
Найти соотношение букв и цифр в строке, напечатать его и удалить все символы '*' из строки, добавив в конец такое же количество символов '!'.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.04.2011, 22:46
Ответы с готовыми решениями:

Обработка символьных данных
в тексте первый символ каждого слова-цифра,указывающая длину этого слова. напечатать каждое слово

Обработка символьных данных.Множественные типы данных
Вставьте в слове после «кас» букву «а», если ее там нет.

Обработка символьных данных.
Помогите пожалуйста, ничего не понимаю в программировании. Нужно написать проги в Паскале,...

Обработка символьных данных
Помогите кто-нибудь!!!!!!!!!!!!!!!!!!!!!!!!!!!! № 1. В заданой строке найти самое длинное и...

Обработка символьных данных
Написать программу обработки строки.Ввод строк организовать в программе. Строка должна состоять из...

1
Puporev
Модератор
57822 / 44051 / 30419
Регистрация: 18.05.2008
Сообщений: 105,349
28.04.2011, 12:25 2
Лучший ответ Сообщение было отмечено clopjkeee как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
uses crt;
var c:char;
    s:string;
    i,bk,cf,k:byte;
begin
writeln('Введите строку, окончание ввода Enter');
s:='';
bk:=0;
cf:=0;
repeat
c:=readkey;
if c<>#13 then
 begin
  write(c);
  s:=s+c;
  if c in ['A'..'Z','a'..'z','А'..'я','Ё','ё'] then inc(bk)
  else if c in ['0'..'9'] then inc(cf);
 end
else writeln;
until c=#13;
writeln('Букв=',bk,'  цифр=',cf);
writeln('Соотношение букв и цифр=',bk/cf:0:2);
k:=0;
for i:=length(s) downto 1 do
if s[i]='*' then
 begin
  k:=k+1;
  delete(s,i,1);
 end;
for i:=1 to k do
s:=s+'!';
write(s);
end.
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.04.2011, 12:25

Обработка символьных данных
Я так понял эта задача решается через тип данных - string. но само действие программы я вобще не...

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

Обработка символьных и строчных данных
Помогите пожалуйста составить программу, которая вводит строку символов, выполняет её обработку. ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

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