Форум программистов, компьютерный форум CyberForum.ru

задача на математическую головоломку - C++

Восстановить пароль Регистрация
 
skreggi
0 / 0 / 0
Регистрация: 25.11.2010
Сообщений: 16
30.11.2011, 00:37     задача на математическую головоломку #1
Жители одного государства очень любят различные математические головоломки. Даже тот, кто желает получить въездную визу, должен решить задачу: отыскать ключевое слово. Условие задачи таково:
На листке написано несколько длинных чисел. Если сложить все цифры в каждом числе, получатся новые числа. Далее, следует сложить все цифры в каждом из вновь полученных чисел. Процесс следует продолжать до тех пор, пока в результате не останутся числа, меньшие 10. После этого все просто: числа от 0 до 9 - это номера букв в алфавите (в этом государстве алфавит состоит всего из десяти букв). Замена чисел буквами и дает ключевое слово.Нужно отыскивать ключевое слово.

Тоесть к примеру если в файле(INPUT4.txt) будет хранится:
AGEIKLMORT
4
8267
19929
54262
0000000000000

то ответ будет:
LIGA

Помогите реализовать!
решение задачи на делфи у меня есть но нужно на С++
На Делфи:
Delphi
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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
const n=255;
  type story=array[1..n] of integer;
       string1=string[248];
  var f,g:text;
      code:story;
      nn,i:integer;
      h0:string;
      h:array[1..n]of string1;
 
   function ff(hhh:string):string; {‚ec?a«?*?? ®?®*c*a?«i*®© aa¬¬e ??aa}
     var i,s,code:integer;
         hh:string;
         v:longint;
     begin
       val(hhh,v,code);
       if v=0
         then s:=0
         else
           begin
             s:=v mod 9;
             if s=0 then s:=9
           end;
       str(s,hh);
       ff:=hh[1]
     end;
 
begin
  assign(f,'C:\Users\User\Desktop\prog4\INPUT4.txt');
  reset(f);
  readln(f,h0);
  writeln(h0);
  readln(f,nn);
  writeln(nn);
  for i:=1 to nn do
    begin
      readln(f,h[i]);
      writeln(h[i]);
      h[i]:=ff(h[i]);
    end;
  close(f);
  writeln;
  for i:=1 to nn do
    begin
      case h[i][1] of
        '0':write(h0[1]);
        '1':write(h0[2]);
        '2':write(h0[3]);
        '3':write(h0[4]);
        '4':write(h0[5]);
        '5':write(h0[6]);
        '6':write(h0[7]);
        '7':write(h0[8]);
        '8':write(h0[9]);
        '9':write(h0[10]);
      end
    end;
  assign(g,'c:\output.txt');
  rewrite(g);
  for i:=1 to nn do
    begin
      case h[i][1] of
        '0':write(g,h0[1]);
        '1':write(g,h0[2]);
        '2':write(g,h0[3]);
        '3':write(g,h0[4]);
        '4':write(g,h0[5]);
        '5':write(g,h0[6]);
        '6':write(g,h0[7]);
        '7':write(g,h0[8]);
        '8':write(g,h0[9]);
        '9':write(g,h0[10]);
      end
    end;
  close(g);
  sleep(10000);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.11.2011, 00:37     задача на математическую головоломку
Посмотрите здесь:

Описать математическую ф-цию C++
C++ Подскажите как провописать математическую функцию на с++
Перевести математическую формулу в С++ C++
C++ Запрограммировать математическую сумму
Математическую функцию отобразить на языке С++ C++
Как правильно записать математическую формулу на C++? C++
Записать математическую формулу на языке C++ C++
C++ Необходимо написать программу и составить математическую модель решения, пожалуйста

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 14:54. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru