Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
C++ Из элементов массива сформировать массив отрицательных элементов в прямой последовательности https://www.cyberforum.ru/ cpp-beginners/ thread3035769.html
Массив a(15): - из элементов массива сформировать массив отрицательных элементов в прямой последовательности; – вычислить сумму элементов на нечетных местах;
Вычислить значение выражения y=f(x) при заданном значении C++
Все входные и выходные данные в задачах вещественные числа. Для ввода и вывода данных использовать функции scanf и printf. Вычислить значение выраженияy=f(x) при заданном значении. Формулу прикрепил. Помогите пожалуйста,вообще не смыслю в C++
C++ Логика, поразрядные операторы https://www.cyberforum.ru/ cpp-beginners/ thread3035729.html
bool PersonClinch.isCorrectButton(PlayerAction playerAction, Buttons rndButton) { byte action = 0; if (playerAction.isWeapon) action |= (1 << 0);
C++ Последовательность https://www.cyberforum.ru/ cpp-beginners/ thread3035719.html
Подходит к концу игровой сезон, и команды уже изучили стратегии своих соперников. Чтобы запутать соперников, главный тренер команды «Воины золотого штата» придумал интересную схему атак: анализируя будущий матч, он высчитывал число n — количество возможных атак команды, а затем на предматчевой тренировке сообщал команде волшебное число x, неизвестное сопернику. Пронумеровав все свои атаки от 1...
Лука и локальная сеть динозавров C++
Лука смог приобрести всю коллекцию динозавров из «Шестёрочки» и обнаружил, что в динозаврах есть коммутаторы, поэтому ему захотелось объединить их в одну локальную сеть. Он расставил на декартовой плоскости всю коллекцию, то есть местоположение каждого динозавра задана двумя числами — координатами по осям x и y. Лука хочет соединить их проводами так, чтобы между любыми двумя динозаврами...
C++ Гонка за лидерством Ограничение по времени: 1 секунда С учётом прошлой победы Стеф набрал за сезон K очков. У его главного конкурента уже набрано L очков. До конца сезона осталось N игр. Определите, сможет ли Стеф стать лучшим бомбардиром сезона, если он будет за каждую игру набирать S очков, а его конкурент в два раза меньше. Для того, чтобы стать лучшим бомбардиром, Стефу достаточно набрать очков не меньше, чем... https://www.cyberforum.ru/ cpp-beginners/ thread3035716.html
C++ Выведите все числа между A и B включительно в порядке возрастания Выведите на экран все числа между A и B включительно в порядке возрастания. Формат входных данных Вводятся два целых числа А и В (|А|, |В| ≤ 100). Формат выходных данных Требуется вывести в столбик числа из диапазона от А до В. входные данные 3 6 выходные данные 3 4 https://www.cyberforum.ru/ cpp-beginners/ thread3035714.html Составить программу подъема натурального числа к третьей степени, учитывая следующую закономерность: C++
Составить программу подъема натурального числа к третьей степени, учитывая следующую закономерность: 1³ = 1 2³ = 3 + 5 3³ = 7 + 9 + 11 4³ = 13 + 15 + 17 + 19 5³ = 21 + 23 + 25 + 27 + 29 Программу написать на с++. ПОМОГИТЕ ПОЖАЛУЙСТА!?
C++ С клавиатуры вводятся координаты точки M(x, y) на плоскости. Определить и вывести на экран, к которому область принадлеж https://www.cyberforum.ru/ cpp-beginners/ thread3035703.html
С клавиатуры вводятся координаты точки M(x, y) на плоскости. Определить и вывести на экран, к которому область принадлежит эта точка. Программу написать на с++. ПОМОГИТЕ ПОЖАЛУЙСТА! БУДУ ОЧЕНЬ БЛАГОДАРЕН!!!
C++ Стеф и его команда https://www.cyberforum.ru/ cpp-beginners/ thread3035697.html
Идёт матч между командами «Воины золотого штата» и «Востон Келтикс». На текущий момент табло показывает время m:s (m — число минут, s — число секунд) и счёт p:q (число очков команд соответственно), атаку совершают «Воины золотого штата». Команда «Воины золотого штата» выбрала следующую стратегию: . они тратят на одну атаку ровно 24 секунды; . забивают только трёхочковые броски. В свою...
C++ Сформировать квадратную матрицу порядка n по заданному образцу:
1 1 1 ... 1 1 1 0 1 1 ... 1 1 0 0 0 1 ... 1 0 0 ... ... ... ... ... ... ... 2 3 4 ... n-1 n 0 1 2 3 ... n-2 n-1 n
C++ Открыть текстовый файл, записать в конец файла три наиболее часто встречающихся слова и кол-во повторений Помогите пожалуйста с задачкой. Открыть текстовый файл в необходимом режиме (на чтение, на чтение и запись, на добавление). (В файле должно быть не менее 30 строк). Записать в конец этого же файла таблицу с указанием трех наиболее часто встречающихся слов и количества их повторений в строке. Добавлено через 3 часа 21 минуту Получилось вывести в консоли текст всех строк, но нужно открыть сам... https://www.cyberforum.ru/ cpp-beginners/ thread3035690.html
11 / 6 / 7
Регистрация: 06.10.2016
Сообщений: 65
26.10.2022, 18:51 0

Как перевести код с Pascal на C++? - C++ - Ответ 16526326

26.10.2022, 18:51. Показов 905. Ответов 3
Метки (Все метки)

Ответ

Наименование переменных - просто ужас

C++
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
#include <iostream>
#include <string> 
using namespace std;
 
int main()
{
    setlocale(LC_ALL, "");
 
    int k, i, n;
    std::string s, x;
 
    std::cout << "Do kakogo natur. cisla sdelati posledovatelinosti? ";
    std::cin >> n;
 
    for (int i = 1; i < n; i++) {
        s = std::to_string(i); // optional
        x = x + s;
    }
 
    system("CLS");
 
    std::cout << x << "\n\n";
    
    std::cout << "Vvedite K: ";
    std::cin >> k;
 
    std::cout << "Otvet: "<<x[k]<<"\n\n";
    
    system("pause");
}


Вернуться к обсуждению:
Как перевести код с Pascal на C++? C++
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.10.2022, 18:51
Готовые ответы и решения:

Как перевести код с Pascal на C++?
uses crt; const nmax=10; var a:array of integer; m,n,i,j,imx:byte; mx:integer; begin...

Как перевести код с Pascal на C++?
Как перевести код с Pascal на C++? program tt5; var u, x, y : real; begin readln(X,Y);...

Как перевести код из Pascal в С#
uses crt; const nmax=100; var a:array of integer; n,i,pp,pn,po,mx:integer; s:string;...

Как перевести код из Pascal в C#
program Project2; {$APPTYPE CONSOLE} uses SysUtils; type air = record num:Integer; sam:...

Как данный код в C# перевести, с Pascal
var n,s:integer; begin Readln(n); s:=0; for var i:=1 to n do s+=i; WriteLn(s); end.

3
26.10.2022, 18:51
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.10.2022, 18:51
Помогаю со студенческими работами здесь

Как перевести код Pascal в Delphi ?
Подскажите пожалуйста. Вот есть уже рабочая программа написанная в среде Turbo Pascal. Как мне её...

Как перевести код из Pascal в Delphi
const nmax=100; var a,b:array of integer; n,m,i,j,k:integer; begin randomize; repeat...

Как перевести этот код с Pascal ABC в C#?
Как перевести данный код с PascalABC на C#? const N = 20; type arr = array of integer; var ...

Нужно перевести код из Turbo Pascal в Pascal ABC.NET
Доброго времени суток. На форуме находил похожие темы, но к сожалению так и не смог разобраться....

Нужно перевести код с Pascal ABC на Turbo Pascal - рисование работающей мельницы
Вот код, он должен рисовать работающею мельницу. uses graphABC,crt; type point=record ...

Перевести в код Pascal ABC из кода Pascal Delphi
procedure TForm1.Button1Click(Sender: TObject); const n=8; var x:array of real; y,z:array of...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru