Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Redsnake
3 / 3 / 2
Регистрация: 16.11.2013
Сообщений: 102
Завершенные тесты: 1
#1

Есть число. Нужно удвоить его, а затем заменить 1 и 0 на A и B - Turbo Pascal

11.06.2014, 11:00. Просмотров 254. Ответов 1
Метки нет (Все метки)

Есть число. Нужно удвоить его, а затем заменить 1 и 0 на A и B
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.06.2014, 11:00
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Есть число. Нужно удвоить его, а затем заменить 1 и 0 на A и B (Turbo Pascal):

Последовательность. Если число положительное, то удвоить его. Иначе найти квадрат - Turbo Pascal
пользователем вводятся любые числа ,сколько раз установит пользователь.Если число положительное то прибавь его же и выведи на экран.Иначе...

Дано двузначное число. Вывести вначале его левую цифру (десятки), а затем - его правую цифру (единицы) - Pascal
Дано двузначное число. Вывести вначале его левую цифру (десятки), а затем - его правую цифру (единицы). Для нахождения десятков...

Дано целое число превышающее 3 млн представление символьной строкой. Удвоить его и ответ вывести - Turbo Pascal
Как это можно сделать? Да и условие не слишком ясно, объясните пожалуйста.

Дано двузначное число. Вывести вначале его левую, а затем правую цифру - Turbo Pascal
Дано двузначное число.Вывести вначале его левую цифру(десятки),а затем-его правую цифру(единицы). Для нахождения десятков использовать...

Если число кратно 12, то найти произведение его цифр, иначе заменить число нулем - Turbo Pascal
С клавиатуры вводится десять трехзначных чётных чисел. Если число кратно 12, то найти произведение цифр, из которого оно состоит, иначе...

Заменить каждое число на число, которое получается из исходного записью его цифр в обратном порядке - Turbo Pascal
Задано множество натуральных чисел. Заменить каждое из них на число, которое получается из исходного записью его (десятичных) цифр в...

1
Sergio Leone
2458 / 1103 / 402
Регистрация: 07.06.2014
Сообщений: 3,259
11.06.2014, 11:46 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
заменить где? В числе нельзя, потому что это число.
Можно заменить в отображении числа (выводе).
А ещё можно получить строку, представляющую данное число и заменить цифры в этой строке:
Pascal
1
2
3
4
5
6
7
8
9
Readln(n);
n := n * 2;
Str(n, s);
for i:=1 to Length(s) do 
  if s[i]='0' then s[i] := 'A'
  else 
    if s[i]='1' then s[i] := 'B';
 
WriteLn(s);
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.06.2014, 11:46
Привет! Вот еще темы с ответами:

Заменить натуральное число на число, которое получается из исходного записью его цифр в обратном порядке - Turbo Pascal
Заменить данное натуральное число на число, которое получается из исходного записью его цифр в обратном порядке. Например, дано число 156,...

Дано натуральное число - Количество его цифр есть четное число - Turbo Pascal
Мой код. Program rb_2; uses crt; var c:string; begin clrscr; Write('Введите число: '); readln(c); if length(c) mod...

Заданное число заменить на число, которое получается из исходного значения записью его цифр в обратном порядке - Turbo Pascal
В подпрограммах не должно присутствовать ввода исходных данных (например, с помощью Readln) и вывода результатов на экран. Ввод исходных...

Заменить данное натуральное число на число, которое получается из исходного записью его цифр в обратном порядке - Turbo Pascal
Заменить данное натуральное число на число, которое получается из исходного записью его цифр в обратном порядке (например, дано 156, нужно...


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

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

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