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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
Nikitos1243
0 / 0 / 0
Регистрация: 07.01.2014
Сообщений: 5
#1

Перевести программу,написанную на паскале,на язык си++ - C++

14.01.2014, 17:09. Просмотров 232. Ответов 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
uses crt;
var a:array[1..2,1..100] of integer;
    m,i,j,s,mx:integer;
begin
randomize;
write('Количество столбцов матрицы m=');
read(m);
writeln('Матрица:');
for i:=1 to 2 do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(5)+1;//введем небольшой диапазон чисел, чтоьы было несколько максимумов
    write(a[i,j]:3);
   end;
  writeln;
 end;
mx:=a[1,1];
for j:=2 to m do
if a[1,j]>mx then mx:=a[1,j];
writeln('Максимальный элемент в первой строке=',mx);
s:=0;
for j:=1 to m do
if a[1,j]=mx then s:=s+a[2,j];
write('Сумма элементов второй строки, в столбцах с максимальным=',s);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.01.2014, 17:09
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перевести программу,написанную на паскале,на язык си++ (C++):

Нужно перевести небольшую программу, написанную на C++, на С (неповторяющиеся символы в строке) - C++
Текст задачи - "Для заданной строки получить те символы, которые встречаются в ней по одному разу." Сделана на С++ (код нашел на этом...

Перевести программу с языка Паскаль в язык С++ - C++
Имееться задача на Pascale: {Метод Ньютона решения нелинейного уравнения} program Newton; uses crt; {модуль управления экраном} ...

Переделать программу написанную на Pascal в С++ - C++
Задание Вариант 1 Вычислить определенный интеграл от функции f(x) на промежутке методом прямоугольников. f(x) = 2sin x cos x + sin...

Как запустить программу на C++ написанную в VS 2008 - C++
Собственно такая проблема. Пытаюсь изучать MFC. Создаю в студии новый проект вин32, подключаю библиотеку MFC, код вот такой: файл app.h ...

Какой исправить программу, написанную в Visual studio? - C++
Написала программу, скомпилировала, закрыла. Нашла ошибку. Какой файл открывать, чтобы исправить ошибку, в какой файле? Не могу найти. Все...

Откомпилировать и выполнить написанную программу из блокнота в Dev-C++ 4.9.9.2 - C++
Здравствуйте. Только начал обучение языку С++ по книге "С++ Базовый курс автор Герберт Шилдт". Дошел до момента, где нужно взять образец...

1
cooller
565 / 533 / 120
Регистрация: 25.12.2013
Сообщений: 1,456
14.01.2014, 17:24 #2
Nikitos1243, Держи
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
#include "stdafx.h"
#include<iostream>
#include<iomanip>
#include<time.h>
 
 
int _tmain(int argc, char* argv [])
{
    setlocale(LC_ALL, "Russian");
    int n = 2, m, i, j, s = 0, mx;
    srand(time(NULL));
    std::cout << "Введите количество столбцов = ";
    std::cin >> m;
    int **a = new int *[n];
    for (int i = 0; i < n; i++)
        a[i] = new int[m];
    for (int i = 0; i < n; i++)
        for (int j = 0; j < m; j++)
            a[i][j] = 1 + rand() % 5;
    for (int i = 0; i < n; i++, std::cout << std::endl)
        for (int j = 0; j < m; j++)
            std::cout << std::setw(3) << a[i][j];
 
    mx = a[0][0];
    for (int j = 1; j < m; j++)
        mx = a[0][j]>mx ? a[0][j] : mx;
 
    std::cout << "Максимальный элементв в первой стороке = " << mx;
    for (int j = 0; j < m; j++)
        if (a[1][j] == mx)
            s += a[1][j];
 
    std::cout << "\nСумма элементов второй строки, в столбцах с максимальным= " << s;
 
    std::cin.get();
    std::cin.ignore();
    
    return 0;
}
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.01.2014, 17:24
Привет! Вот еще темы с ответами:

Перевести на язык С++ - C++
Помогите пожалуйста записать эти строчки на языке С++: int* val = (int*)calloc(1, sizeof(int)); for (j = 0, *val = 1; j &lt;...

Правильно перевести на язык c++ - C++
Перевести на язык c++ void sort_podchet(int count,double *in,double *out) { int i,j,k; for(i=0;i &amp;lt; count;i++) { ...

Перевести код на язык С++ - C++
#include &lt;stdio.h&gt; #include &lt;string.h&gt; int main(void) { printf(&quot;Enter of string: &quot;); char str; gets(str); ...

ламеру перевести в язык с++ - C++
Задание: проверить, есть ли в массиве несколько элементов с максимальным значением. const n = 7; var x: array of real; ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru