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

Из паскаля в c++ с небольшим изменением - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Сортировка матрицы http://www.cyberforum.ru/cpp-beginners/thread1311957.html
Вот алгоритм Сверху-вниз-влево, с конца главной диагонали
C++ Объясните в чем ошибка Помогите найти ошибку в программе... Определить корень третьей степени от Z по итерационной формуле, пока |Wn+1 - Wn| < e Wn+1 = Wn +(1/3)(Z/ Wn2- Wn) начальное значение Z/3 , если Z >= 0 W0= 3 Z если Z < 1 Использовать функцию F(w) = w + (1/3)(Z/ w2- w) Вот такую программку я написал... http://www.cyberforum.ru/cpp-beginners/thread1311952.html
C++ Меню(Шаблон)
Подскажите как сделать меню на С++ 1. Запуск программы один 2. Запуск программы два 3. Выход Чтобы допусти при выборе программы 1 у нас запускалась программа которая считает сумму нечетных чисел от 1 до 30, при выборе программы выполнять другая программа.
C++ Как можно оптимизировать?
Как можно оптимизировать программу,чтобы она работала до 1 секунды? #include<iostream> #include<cstring> using namespace std; int sdvig(char a,char b,int m,int s) { int t; for (int i=0;i<m;i++) {
C++ Определить самое длинное слово всех слов введенных предложений http://www.cyberforum.ru/cpp-beginners/thread1311922.html
Ввести последовательность предложений. Определить самое длинное слово всех слов введенных предложений. Предложения с этим словом напечатать большими буквами. :cry::-|
C++ Передаче параметров из класса в main В header файле в метод menu класса Menu, передаю класс ResuryHealth. int Menu::menu(ResuryHealth){ ..... } Соответственно при вызове метода menu в main требуется параметр. Menu choose; choose.menu(сюда параметры); Проблема в том, что я не знаю как передать туда параметр, помогите, то только столкнулся с таким. подробнее

Показать сообщение отдельно
Dream2
0 / 0 / 0
Регистрация: 16.06.2013
Сообщений: 77
26.11.2014, 20:50     Из паскаля в c++ с небольшим изменением
Ребят помогите написать прогу на с++, а так же переделать под файлы.
(Само задание:Пусть дан файл целых чисел. Создайте новый файл, значения в который записываются по следующему правилу: суммируются подряд идущие значения одного знака; вместо группы нуле записывается один нуль.)

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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
Var
  Mas1,Mas2:array[1..10] of Integer;
  i,j,k:Byte;
  SumP,SumO:Integer;
begin
  Randomize;
  For i:=1 to 10 do
  Begin
    Mas1[i]:=-20+Random(40);
    Write(Mas1[i]:4)
  End;
  Writeln;
  i:=1;
  j:=1;
  SumO:=0; 
  SumP:=0;  
  While i <= 10 do
  Begin
    If Mas1[i] > 0 then 
    Begin
      SumP:=0;
      While (Mas1[i] > 0) and (i <= 10) do   
      Begin
        SumP:=SumP+Mas1[i];  
        inc(i)            
      End;
      Mas2[j]:=SumP;     
      inc(j)
    End;
    If Mas1[i] < 0 then  
    Begin
      SumO:=0;
      While (Mas1[i] < 0) and ( i <= 10) do
      Begin
        SumO:=SumO+Mas1[i];                
        Inc(i)
      End;
      Mas2[j]:=SumO;    
      inc(j)
    End
    Else
    If Mas1[i] = 0 then    
    Begin
      Mas2[j]:=0;         
      inc(j);
      While (Mas1[i] = 0) and ( i <= 10) do Inc(i)      
    End;
  End;
  For i:=1 to j-1 do
  Write(Mas2[i]:4);
  Readln
End.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 14:21. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru