Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
3 / 3 / 1
Регистрация: 03.11.2015
Сообщений: 61

Перевести с Паскаль на С++

13.11.2015, 20:27. Показов 1127. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Само задание: вводить массив малых латинских букв, и отсортировать в алфавитном порядке
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program sort;
var s:string; 
i,j:integer; 
c:char; 
begin 
write('string:'); 
readln(s); 
for i:=2 to length(s) do 
for j:=2 to length(s) do 
 if s[j-1]>s[j] 
then begin 
c:=s[j-1]; 
s[j-1]:=s[j]; 
s[j]:= c 
end;
writeln(s); 
readln 
end.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.11.2015, 20:27
Ответы с готовыми решениями:

Перевести код из паскаль АБС в фри паскаль
Необходимо перевести этот код из паскаля АБЦ в фрипаскаль Спасибо! program test; const n=20; var ...

Снова перевести с Турбо Паскаля на Паскаль АВС или Паскаль АВС.Нет
program derevo; uses crt, graph; function cx(length, angle:real):integer; begin cx:=round(length*cos(angle)); end; ...

Перевести С++ в Паскаль
Здравствуйте, нужна помощь в переводе С++ на язык Паскаля) спасибо заранее #include <iostream> #include <cmath> using...

1
Заблокирован
14.11.2015, 09:30
Лучший ответ Сообщение было отмечено NewUser2015 как решение

Решение

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#include <iostream>
#include <string>
#include <vector>
#include <algorithm>
 
using namespace std;
 
int main()
{
    string s;
    cout << "string: ";
    getline(cin, s);
    vector<char> v(s.begin(), s.end());
    sort(v.begin(), v.end());
    s.assign(v.begin(), v.end());
    cout << s << endl;
}
Добавлено через 10 часов 47 минут
тьфу совсем забыл что строки в плюсах изменяемые *слишком много шарпа* -_-
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#include <iostream>
#include <string>
#include <algorithm>
 
using namespace std;
 
int main()
{
    string s;
    cout << "string: ";
    getline(cin, s);
    sort(s.begin(), s.end());
    cout << s << endl;
}
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
14.11.2015, 09:30
Помогаю со студенческими работами здесь

Перевести С++ в Паскаль
Здравствуйте, помогите перевести на язык Паскаля функцию #include &lt;iostream&gt; #include &lt;math.h&gt; #include &lt;iomanip&gt; int...

Перевести С++ в Паскаль
Всем здравствуйте, нужна помощь в переводе на язык Паскаля) #include &lt;iostream&gt; #include &lt;stdio.h&gt; #include &lt;math.h&gt; ...

Перевести с С на Паскаль
#include &lt;stdio.h&gt; #define N 4 void swap(int *a, int *b) { int t; t=*a; *a=*b;

Перевести С++ в Паскаль
Здравствуйте, нужна помощь в переводе С++ на язык Паскаля) спасибо заранее #include &lt;iostream&gt; #include &lt;math.h&gt; #include...

Перевести с Паскаль на С++
я не знал извините то поможете


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru