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

Необходимо перевести из паскаля в с++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Выставить цифры в числе 1234567890 таким образом, чтобы новое число делилось без остатка на все числа от 2 до 18 включительно. http://www.cyberforum.ru/cpp-beginners/thread697559.html
Дана задача. Выставить цифры в числе 1234567890 таким образом, чтобы новое число делилось без остатка на все числа от 2 до 18 включительно. Я написал нижеследующее, но программа выводит почему то...
C++ Массив: Учащиеся участвовали в посадке деревьев. Сколько деревьев было посажено 1)Учащиеся 8-х классов участвовали в посадке деревьев. 8-а посадил 100 деревьев, 8-б —122 дерева, 8-в — 98 деревьев, 8-г — 104 дерева, 8-д — 121 дерево. Определить, сколько посажено деревьев. http://www.cyberforum.ru/cpp-beginners/thread697558.html
C++ проверьте программу,пожжалуйста;)
Сначала нужно ввести таблицу, в которой первое поле название, второе- группа, третье- место обитания, четвертое- численность..))) А потом сортировка по первому столбцу по алфавиту, с чем собственно и...
Ошибка в проекте C++
Первый файл проекта:int stepen(int x,int y);Второй файл проекта:#include "func.h" int stepen(int x,int y) { int z,i; z=x; for (i=1;i<y;i++) z=z*x; return z;} Третий файл проекта :
C++ комплексные числа http://www.cyberforum.ru/cpp-beginners/thread697545.html
у меня функция принимает только числа с плюсом, как разрешить ввод и вывод с минусом , например 4-5i void first_complex_number(int &real1, int &image1) { cout << "a+b:"; cin >> real1; ...
C++ Полиморфные функции Всем привет, случалась такая проблема. Есть абстрактный класс class Abstract{ //Абстрактный класс public:virtual void print_msg()=0; }; нужно создать полиморфнуу функцию операндом которой... подробнее

Показать сообщение отдельно
Vlad708
4 / 4 / 0
Регистрация: 04.11.2012
Сообщений: 72

Необходимо перевести из паскаля в с++ - C++

14.11.2012, 17:37. Просмотров 282. Ответов 1
Метки (Все метки)

Имеется программа на Паскале:
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
uses crt;
var a: array [1..255] of string;
    i,j,k,l: byte;
    s,sl: string;
begin
write('s='); readln(s);
s:=s+' '; sl:=''; j:=0;
for i:=1 to length(s) do
    if not (s[i] in [' ','.',',',':',';','-','!','?'])
       then sl:=sl+s[i] else
            if length(sl)>0 then
               begin
               inc(j);
               a[j]:=sl;
               sl:='';
               end;
    for i:=1 to j do
        begin
        k:=0;
        for l:=1 to j do
            if a[i]=a[l] then inc(k);
        if k=1 then write(a[i],' ');
        end;
readln;
end.
Но нужно её перевести в С++, помогите пожалуйста)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru