2 / 2 / 2
Регистрация: 06.06.2013
Сообщений: 83
1

Измените регистр символа, если он был латинской буквой

22.06.2015, 12:58. Показов 1783. Ответов 2
Метки нет (Все метки)

Пожалуйста помогите с задачей, она должна пройти тестирование на сайте дистанционной подготовки.
Условие: Измените регистр символа, если он был латинской буквой: сделайте его заглавным, если оон был строчной буквой и наоборот. Для этого напишите отдельную функцию, меняющую регистр символа. Заранее всем спасибо, очень надеюсь на помощь.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.06.2015, 12:58
Ответы с готовыми решениями:

Даны два символа. Верно ли, что код хотя бы одного из них является малой латинской буквой
даны два символа. верно ли, что код хотя бы одного из них является малой латинской буквой

Если первый символ текста не является малой латинской буквой, то оставить его без изменений
Здравствуйте, помогите пожалуйста с задачами. 1)Дан текст. Если первый символ текста не является...

Определить, является ли введенный символ латинской буквой
Ввести символ с клавиатуры. Определить, является ли этот символ: - латинской буквой; - русской...

Определить, является ли данный символ латинской буквой
Определить, является ли данный символ латинской буквой. program z1; var i,j,s,n,m:integer;...

2
Эксперт Pascal/Delphi
2371 / 1287 / 1487
Регистрация: 29.08.2014
Сообщений: 4,615
22.06.2015, 13:50 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const
  s1='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';
  s2='abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
var
  c:char;
function chlet(c:char):char;
var
  i:integer;
begin
  i:=pos(c,s1);
  if i>0 then chlet:=s2[i] else chlet:=c;
end;
begin
  readln(c);
  writeln(chlet(c));
end.
1
3203 / 1773 / 475
Регистрация: 28.02.2015
Сообщений: 3,619
22.06.2015, 14:05 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
a:string;
b:integer;
function CaseXor(a:char):char;
  begin
    if a in ['a'..'z','A'..'Z'] then CaseXor:=char(ord(a) xor 32)
                                else CaseXor:=a;
  end;
begin
  write ('enter :');
  readln(a);
  write ('result:');
  for b:=1 to length(a) do
    write(CaseXor(a[b]));
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.06.2015, 14:05

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Измените регистр символа, если он был латинской буквой
Измените регистр символа, если он был латинской буквой: сделайте его заглавным, если он был...

Измените регистр символа JavaID
Задание:Измените регистр символа, если он был латинской буквой: сделайте его заглавным, если он был...

Дан текст.Если первый символ текста не является малой латинской буквой, то оставить его без изменения
Здравствуйте форумчане! Обращаюсь в который раз к вам с просьбой. Помогите пожалуйста запустить...

Изменить регистр строки, если она начинается с символа А
Здравствуйте! Нужна помощь в написании программы которая будет менять регистр строки если она...


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

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

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