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

C++ конвертация из паскаль - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Собранное приложение завершается с ошибкой http://www.cyberforum.ru/cpp-beginners/thread873079.html
Здравствуйте. Подскажите пожалуйста новичку. Взял приложение из учебника, переписал в Visual Studio, собрал, а оно выкидывает. Приложение делает следующее: 1. Берет текст из файла unform.txt 2. Форматирует каждую строку по ширине 3. Выводит результат в файл formatd.txt 4. Подсчитывает количество слов в тексте и выводит на экран Проблема: если исходный файл имеет кодировку unicode, то...
C++ Вывести стек наоборот Вывести стек наоборот. Использовать указатели. Помогите пожалуйста вывести стек нaоборот (функция printstack2). // STEK_3.cpp: определяет точку входа для консольного приложения. // #include "stdafx.h" #include <iostream> using namespace std; struct node http://www.cyberforum.ru/cpp-beginners/thread873076.html
C++ нужен скрипт
народ помогите нужен скрипт который заставит мышку нажимать и отжимать левый, правый таб а также перемещатся в заданых координатах в пример можно написать как мышка после запуска скрипта сама опустилась в нижний левый угл экрана и сама открыла меню пуска винды желательно чтобы скрипт работал как на win7 также и на winXP
C++ Введите числа a, b, c и т.д. с клавиатуры и реализуйте функции для соответствующих вычислений
Вычислить x = (sin(a) * sin(b) * sin(c))2+(sin(a) * sin(b) * sin(c))3. Оформить вычисление (sin(a) * sin(b) * sin(c)) как функцию.
C++ шифр RSA http://www.cyberforum.ru/cpp-beginners/thread873002.html
Добрый день, люди добрые помогите )) не могу понять в чем ошибка... сам алгоритм Два больших простых числа P и Q N=PQ затем вычисляется функция эйлера fi=(P-1)(Q-1) и выбирается некоторое D (d<fi) взаимно простое с fi. и по обобщенному алгоритму эвклида находится С, такое что c*d mod fi=1 Дальше шифрование. e=m^d mod n, где m- символ который шифруем Расшифровка. m`=e^c mod n. (алгоритм...
C++ Вычислить значение м при помоши вспомогательных функций Очень надо, помогите, пожалуйста) Заданы три массива случайных действительных чисел определенной размерности A, B, C. Необходимо вычислить значение М. Задание массивов, вывод их на печать и вычисление вспомогательных выражений оформить в виде отдельных функций. Выводить на экран промежуточные значения. Размерность n*n M=sqrt(SA^2+SB^2+SC^2), где SA - Ʃa(ii), SB - Ʃb(ii), SC - Ʃc(ii) подробнее

Показать сообщение отдельно
Zepp233
-45 / 0 / 0
Регистрация: 07.04.2013
Сообщений: 21
21.05.2013, 16:10     C++ конвертация из паскаль
Доброго времени суток дорогие форумчане. Можете помочь реализовать задачу на 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
Program labwork1;
uses crt;
var
   x, z, y, a, b: real;
   n, i, e, e1, e2:integer;
   h, a1, b1: string;
Begin
 
 
 
       repeat
         writeln ('Введи числа A и В,  где А<В и не больше 999');
         Writeln ('Введи начало интервала, a=');
         readln (a1);
         Writeln ('Введи b');
         readln (b1);
         val (b1,b,e2);
         val (a1,a,e1);
       until (b>a) and (e1=0) and (e2=0) and (length(a1)<=10) and (length(b1)<=10);
 
 
 
 
  repeat
       Writeln ('Введи целое положительное число, n='); readln (a1);
        val (a1,n,e);
  until  (n>0) and (e=0) and (length(a1)<=3);
 
 
     z:=(b-a)/n;
     x:=a;
   for i:=1 to n+1 do begin
    write ('x=', x, '      ');
    if x=0 then writeln ('не определено')
           else
               begin
                    y:=(Sin(x)/x)*Exp(-x)*(1+(exp(ln(x/3))));
                    writeln ('y=', y);
               end;
    x:=x+z;
   end;
 
 
End.
Помогите перетащить всё это дело на Си? Я собираюсь использовать Dev c++. Но увы. Буду очень благодарен если напишете, поставлю только +, вообще любому кто поможет. Cпасибо за ваше внимание)
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 00:01. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru