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

Перевести с Паскаля на С++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Определить принадлежность символа к тому или иному алфавиту http://www.cyberforum.ru/cpp-beginners/thread1309222.html
После ввода с клавиатуры произвольного строки определить его принадлежность к тому или иному алфавита. Символы, которые не входят в алфавиты, а не анализировать. Возможен третий вариант ответа. Срочно надо, напишите код на С++!! Заранее благодарю за помощь!
C++ R6025 pure virtual function call Ошибка - r6025 pure virtual function call. Что не так? #include <iostream> #include <cstring> using namespace std; class Animal { //Класс животные int men; //Колличество мужских особей. int women; //Колличество женских особей. char name; //Название животного http://www.cyberforum.ru/cpp-beginners/thread1309220.html
Как сделать доступным обращение к методу параметра, объявленного константной ссылкой? C++
error: passing 'const TEditingString' as 'this' argument of 'std::wstring TEditingString::GetData()' discards qualifiers Ругается на строку, содержащую присваивание локальной переменной значения метода параметра, объявленного константной ссылкой. Метод состояния объекта не меняет. Как исправить?
Имеется типизированный файл с числами, напечатать все его элементы большие числа a с++ C++
Имеется типизированный файл с числами. Напечатать все его элементы большие числа a.
C++ N-мерный массив в векторе http://www.cyberforum.ru/cpp-beginners/thread1309210.html
Здравствуйте. Можно ли в векторе хранить n-мерный массив. т.е. я с клавиатуры ввожу размерность n массива и потом заполняю сам массив.
C++ В массиве каждый третий элемент заменить полусуммой двух предыдущих (с использованием указателей) Заранее большое спасибо.(написать программу с использованием указателей) подробнее

Показать сообщение отдельно
Фролл
0 / 0 / 0
Регистрация: 13.10.2014
Сообщений: 25
24.11.2014, 11:36     Перевести с Паскаля на С++
Помогите, пожалуйста! Переведите код с Паскаля на С++!!
Срочно!!

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
program ghost;
uses
     crt;
type
     man = Record
     fam: String;
     name: String;
     data: Integer;
     end;
var
    perepis: array[1..3] of man;
    i: Integer;
    count: Integer;
begin
    clrscr;
    perepis[1].fam := 'ivanov';
    perepis[1].name := 'ivan';
    perepis[1].data := 1990;
    perepis[2].fam := 'petrov';
    perepis[2].name := 'petr';
    perepis[2].data := 1991;
    perepis[3].fam := 'sidorov';
    perepis[3].name := 'sidr';
    perepis[3].data := 1992;
    count := 0;
    for i := 1 to 3 do
        if (perepis[i].data = 1990) then
           Inc(count);
    for i := 1 to 3 do
    begin
         write('famaly: ', perepis[i].fam);
         writeln;
         write('name: ', perepis[i].name);
         writeln;
         write('data: ', perepis[i].data);
         writeln;
         writeln('_____');
    end;
    writeln('count: ', count);
    readkey;
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 00:40. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru