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

C Pascal ABC на C++ - C++

Восстановить пароль Регистрация
 
Abai1505
Сообщений: n/a
15.04.2014, 09:28     C Pascal ABC на C++ #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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
const
 
  n = 10;
 
var
 
  a:array[1..n] of integer;
 
  i, j:integer;
 
begin
 
  randomize;
 
  writeln('Исходный массив:');
 
  for i := 1 to n do
 
  begin
 
    a[i] := random(101);
 
    write(a[i], ' ');
 
  end;
 
  
 
  for i := 1 to n - 1 do
 
    for j := 1 to n - i do
 
      if a[j] mod 10 > a[j + 1] mod 10 then
 
      begin
 
        a[j] := a[j] + a[j + 1];
 
        a[j + 1] := a[j] - a[j + 1];
 
        a[j] := a[j] - a[j + 1];
 
      end;
 
 
 
  writeln;
 
  writeln('Результат:');
 
  for i := 1 to n do
 
    write(a[i], ' ');
 
  writeln;
 
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.04.2014, 09:28     C Pascal ABC на C++
Посмотрите здесь:

C++ надо написать программу на С++ и на Pascal ABC
C++ среднее арифметическое на Pascal ABC
C++ Найти сумму длин медиан треугольника ABC
Треугольник со сторонами abc C++
Вычисления функции на заданном промежутке. (Pascal ABC>C++) C++
из Pascal ABC в C++ C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Trukhanov_VP
 Аватар для Trukhanov_VP
36 / 36 / 5
Регистрация: 28.03.2013
Сообщений: 278
Записей в блоге: 2
15.04.2014, 10:11     C Pascal ABC на C++ #2
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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#include <stdio.h>
#include <iostream>
#include <Windows.h>
 
const int n = 10;
 
int a[n];
 
using namespace std;
 
void main()
{
cout << "Исходный массив: " << endl;
 
for (int i = 1;i >n;i++) {
    a[i] = rand() % 100 + 1;
    cout << a[i] + " " << endl;
}
 
for (int i=1;i>n-1;i++)
{
    for (int j=1;j>n-i;j++)
    {
        if ((a[j] % 10) > (a[j+1]))
        {
            a[j] = a[j] + a[j + 1];
 
            a[j + 1] = a[j] - a[j + 1];
 
            a[j] = a[j] - a[j + 1];
        }
    }
}
 
cout << "Результат:" << endl;
 
for (int i = 1;i >n;i++) {
    a[i] = rand() % 100 + 1;
    cout << a[i] + " " << endl;
}
 
system("pause");
 
 
}
Yandex
Объявления
15.04.2014, 10:11     C Pascal ABC на C++
Ответ Создать тему
Опции темы

Текущее время: 14:59. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru