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

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

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

Перевести из паскаля в с (подсчет отрицательных элементов) - C++

21.05.2014, 04:38. Просмотров 160. Ответов 1
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Const n=6;m=5;
Var A:array[1..n,1..m] of real;
    B:array[1..n] of byte;//для подсчёта кол-ва отрицательных
    i,j,imax:byte;
Begin
    For i:=1 to n do
    Begin
      For j:=1 to m do
      Begin
        A[i,j]:=random*10-5;
        write(A[i,j]:6:2,' ');
        if A[i,j]<0 then inc(B[i]);
      End;
      writeln;
    End;
    imax:=1;
    For i:=2 to n do
     if B[i]>B[imax] then imax:=i;
    writeln('Max кол-во отрицательных в ',imax,' строке их там = ',B[imax]);
    readln;
End.
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.05.2014, 04:38
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перевести из паскаля в с (подсчет отрицательных элементов) (C++):

Нужно перевести из паскаля в Си. Определить сумму положительных элементов - C++
uses crt; const nmax=20; var a:array of integer; b,ab:array of integer; m,n,i,j,k:byte; begin clrscr; randomize; ...

Функция: подсчет числа отрицательных элементов массива, и суммы положительных элементов матрицы - C++
написать функцию подсчета отрицательных элементов одномерного массива А(6) и сумму положит-х эл-ов матрицы В(6x6)

Подсчет отрицательных элементов - C++
Вот что выводится, проблема заключается в том что программа определяет в каких строках есть нулевые элементы, но она не считает кол-во...

Подсчет подряд идущих отрицательных элементов - C++
C 2 № 2908. Опишите на русском языке или на одном из языков программирования алгоритм подсчета максимального количества подряд идущих...

Подсчет суммы отрицательных элементов массива А(10) - C++
Помогите решить задачку подсчета суммы отрицательных элементов массива А(10) буду признателен

Подсчет среднего арифметического отрицательных элементов массива - C++
дан одномерный динамический массив вещественных чисел. посчитать среднее арифметическое отрицательных элементов. Функции: ввода массива,...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
kasan
Чорумфанин
337 / 337 / 185
Регистрация: 06.03.2014
Сообщений: 881
21.05.2014, 10:31 #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
#include <iostream>
#include <stdlib.h>
using namespace std;
 
int main ()
{
int const n=6,m=5;
double A[n][m];
int B[n]; //для подсчёта кол-ва отрицательных
int i,j,imax;
 
for(i=0;i<n;i++)
    B[i]=0;
 
for(i=0;i<n;i++)
{
    for(j=0;j<m;j++)
    {
        A[i][j]=rand()%16-5;
        cout<<A[i][j]<<"  ";
                if(A[i][j]<0)
                    B[i]++;
    }
    cout<<endl;
}
imax=0;
for(i=1;i<n;i++)
{
    if(B[i]>B[imax])
        imax=i;
}
 
cout<<"Max кол-во отрицательных в "<<imax<<" строке их там = "<<B[imax]<<endl;
 
return 0;
}
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.05.2014, 10:31
Привет! Вот еще темы с ответами:

Подсчет количества отрицательных элементов в одномерном массиве - C++
Помогите написать программу с использованием функций, подсчета количества отрицательных элементов в одномерном массиве.

Перевести из паскаля в c++ - C++
собственно вот паскалевский код, тут через файлы. На с++ надо через ввод/вывод. var N:integer; E:integer; En1,En2:integer; ...

Перевести с Паскаля на C++ - C++
как заменить этот же код на С++ ?? const nmax = 100; type arr = array of real; var a:arr; i,j,n,imax,jmax:integer; ...

Перевести с паскаля на си - C++
Здравствуйте,помогите пожалуйста перевести с паскаля на си var s: string; i: byte; sum,c,k,max: integer; begin sum:=0;...


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

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

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