0 / 0 / 0
Регистрация: 16.11.2009
Сообщений: 25
1

Вывести числа прописью

16.11.2009, 15:08. Показов 7670. Ответов 16
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
ребят помогите пожалуйста сделать эту задачу очень очень нужно
27. Составьте программу, которая по введенному вами числу N (от 1 до 100) напечатает все натуральные числа X русскими буквами (двадцать, сорок пять и т.д.). Например, для числа 4 программа должная напечатать «один», так как в слове «один» четыре буквы. Для числа 9 программа должная напечатать «сорок пять», так как в записи числа «сорок пять» девять букв
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.11.2009, 15:08
Ответы с готовыми решениями:

Вывести число прописью
нам домашку задали написать программу в которую вводишь число от 0 до 9 и она его прописью выдаёт....

Вывести число прописью
Очень нужна программа в которой вводишь число от 0 до 1 000 000 и она его прописью выдаёт.

Вывести число прописью
Пишет правильно только числа от 1 до 100 и все числа с нулем на конце,если например 117 то...

Написать процедуру вывода целого числа N прописью(0<N<99).
Написать процедуру вывода целого числа N прописью(0&lt;N&lt;99).

16
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
16.11.2009, 15:33 2
Цитата Сообщение от николай сидоров Посмотреть сообщение
Для числа 9 программа должная напечатать «сорок пять», так как в записи числа «сорок пять» девять букв
Сам понял, что написал? И вообще в начале задания одно условие(21=двадцать один), в конце уже другое(21=12 букв). И что делать?

Добавлено через 1 минуту
Например, для числа 4 программа должная напечатать «один», так как в слове «один» четыре буквы.
Ну а это вообще шедевр!
1
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
16.11.2009, 15:35 3
))))супер!!!)))
1
0 / 0 / 0
Регистрация: 16.11.2009
Сообщений: 25
16.11.2009, 15:38  [ТС] 4
ребят понимаете что эти задачи нам дал препод и я сам не знаю что делать
0
0 / 0 / 0
Регистрация: 16.11.2009
Сообщений: 25
16.11.2009, 15:42  [ТС] 5
28. Запишите любое число от 1 до 1000, введенное пользователем, русскими буквами. Например, 2 – два, 150 – сто пятьдесят.
или вот еще задача((((((
помогите плиз
0
0 / 0 / 0
Регистрация: 16.11.2009
Сообщений: 25
16.11.2009, 15:44  [ТС] 6
28. Запишите любое число от 1 до 1000, введенное пользователем, русскими буквами. Например, 2 – два, 150 – сто пятьдесят.
или вот еще задача((((((
помогите
0
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
16.11.2009, 15:44 7
а почему тогда для числа 4 нельзя печатать "пять"? тоже ведь четыре буквы...
1
0 / 0 / 0
Регистрация: 16.11.2009
Сообщений: 25
16.11.2009, 15:50  [ТС] 8
Тамилочка если честно я сам не знаю((((( а ты можешь решить следующюю задачку?????
0
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
16.11.2009, 15:54 9
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от николай сидоров Посмотреть сообщение
27. Составьте программу, которая по введенному вами числу N (от 1 до 100) напечатает все натуральные числа X русскими буквами (двадцать, сорок пять и т.д.). Например, для числа 4 программа должная напечатать «один», так как в слове «один» четыре буквы. Для числа 9 программа должная напечатать «сорок пять», так как в записи числа «сорок пять» девять букв
да конечно задание оторви и выброси... но скорее всего ваш препод имел ввиду вот это. тут только для 10 чисел остальное напишешь сам удаление пробела для чисел из двух слов я сделал.
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
const
  max=10;
var
  a:array[1..max]of string;
  i,n:integer;
  temp:string;
begin
  a[1]:='îäèí';
  a[2]:='äâà';
  a[3]:='òðè';
  a[4]:='÷åòûðå';
  a[5]:='ïÿòü';
  a[6]:='øåñòü';
  a[7]:='ñåìü';
  a[8]:='âîñåìü';
  a[9]:='äåâÿòü';
  a[10]:='äåñÿòü';
  readln(n);
  writeln('Íàéäåííûå ñëîâà:');
  for i:=1 to max do
  begin
    temp:=a[i];
    while pos(' ',temp)<>0 do
      delete(temp,pos(' ',temp),1);
    if length(temp)=n then
      write(a[i],' ');
  end;
  writeln
end.
2
0 / 0 / 0
Регистрация: 16.11.2009
Сообщений: 25
16.11.2009, 15:55  [ТС] 10
пасибо огромное тебе))))))
0
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
16.11.2009, 15:56 11
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от николай сидоров Посмотреть сообщение
28. Запишите любое число от 1 до 1000, введенное пользователем, русскими буквами. Например, 2 – два, 150 – сто пятьдесят.
или вот еще задача((((((
эта на основе предыдущей но опять же допишешь остальные числа сам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
const
  max=10;
var
  a:array[1..max]of string;
  n:integer;
  temp:string;
begin
  a[1]:='îäèí';
  a[2]:='äâà';
  a[3]:='òðè';
  a[4]:='÷åòûðå';
  a[5]:='ïÿòü';
  a[6]:='øåñòü';
  a[7]:='ñåìü';
  a[8]:='âîñåìü';
  a[9]:='äåâÿòü';
  a[10]:='äåñÿòü';
  readln(n);
  write(a[n]);
  writeln
end.
1
2923 / 844 / 324
Регистрация: 30.04.2009
Сообщений: 2,633
16.11.2009, 19:12 12
Цитата Сообщение от николай сидоров Посмотреть сообщение
для числа 4 программа должная напечатать «один», так как в слове «один» четыре буквы. Для числа 9 программа должная напечатать «сорок пять», так как в записи числа «сорок пять» девять букв
мне интересно а для 100 что надо будет написать, или 25 раз написать один

Добавлено через 4 минуты
Цитата Сообщение от Inadequate Посмотреть сообщение
const max=10; var a:array[1..max]of string; n:integer; temp:string; begin a[1]:='один'; a[2]:='два'; a[3]:='три'; a[4]:='четыре'; a[5]:='пять'; a[6]:='шесть'; a[7]:='семь'; a[8]:='восемь'; a[9]:='девять'; a[10]:='десять'; readln(n); write(a[n]); writeln end.
а не многовато и не сложновато так будет писать , не проще ли разделить задачу на десятки и единицы и где надо подставить соответствующие значения
например
одиннадцать
тринадцать
шестнадцать
семнадцать
разве ни заметно никакого сходства
1
Inadequate
16.11.2009, 19:22
  #13

Не по теме:

mamedovvms, ты сам подумай нужен ли мне этот гемор? если тебя впечатлило условие данной задачи, то меня както неочень... оно мало того что кривое, так и еще и нелогичное... ты правильно заметил насчет 100 я тоже об этом подумал. поэтому написал я эти куски кода, для того чтобы ему было в каком направлении работать... а там пусть уточняет задание и сам дописывает, это будет намного лучше и полезнее для него... Мне лично это(упрощение ввода в массив) не очень интересно... Я это сделать при надобности смогу.

1
2923 / 844 / 324
Регистрация: 30.04.2009
Сообщений: 2,633
17.11.2009, 12:37 14
Цитата Сообщение от Inadequate Посмотреть сообщение
mamedovvms, ты сам подумай нужен ли мне этот гемор? если тебя впечатлило условие данной задачи, то меня както неочень... оно мало того что кривое, так и еще и нелогичное... ты правильно заметил насчет 100 я тоже об этом подумал. поэтому написал я эти куски кода, для того чтобы ему было в каком направлении работать... а там пусть уточняет задание и сам дописывает, это будет намного лучше и полезнее для него... Мне лично это(упрощение ввода в массив) не очень интересно... Я это сделать при надобности смогу.
да я понимаю что было дано направление, но оно было дано не правильно вот в чем проблема, а то что меня впечатлило или нет, на это могу тебе сказать что я писал задачи такие не до 100 а гораздо больше, и ничего нормально, главное в них найти такие как например сорок, четыреста, а не просто и тупа составить алгоритм, он конечно составляется но у него есть и исключения
1
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
17.11.2009, 13:08 15

Не по теме:

mamedovvms, я не буду с тобой спорить, как говорится у каждой задачи есть как минимум два решения, сделай по своему и выложи свой вариант.



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

Не по теме:

Цитата Сообщение от mamedovvms Посмотреть сообщение
а то что меня впечатлило или нет
я не говорил о его "сложности", я говорил о том что условие написано неточно и некорректно, и решать по такому условию не всем хочется, это доказывают первые посты... Зачем выносить себе мозги, если даже условие не могут понятно записать... Если хочется получить нормальный ответ, нужно научиться задавать нормальные вопросы... О "сложности" вопроса тут речь не велась...

1
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
17.11.2009, 13:40 16
Мужики, хорош спорить, условие некорректное и давно уже в Разделе Юмор.

Добавлено через 1 минуту
Вот ссылка, опубликовал не я.
Практические занятия по программированию(из жизни форума)
2
БурундукЪ
17.11.2009, 13:41     Вывести числа прописью
  #17

Не по теме:

Puporev, не совсем верно ссылку дал
вот Практические занятия по программированию(из жизни форума)

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.11.2009, 13:41

Вывести числа прописью
Помогите решить задачку в паскале абц ) Дано целое число в диапазоне 100-999. Вывести...

Вывести числа прописью
Составьте программу, которая запрашивает количество сотен, десятков и единиц в загаданном числе и...

Найти сумму цифр числа, записанного прописью
Всем доброго времени суток! Помогите, пожалуйста, с задачей. Дана строка, в которой записано целое...

Вывести числа прописью
Программа вводит число в диапазоне от 1 до 999 и выводит на экран значение числа русскими буквами...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru