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

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

Восстановить пароль Регистрация
 
Nikkel
0 / 0 / 0
Регистрация: 19.02.2014
Сообщений: 3
21.05.2014, 04:38     Перевести из паскаля в с (подсчет отрицательных элементов) #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++
C++ Подсчет суммы отрицательных элементов массива А(10)
C++ Подсчет подряд идущих отрицательных элементов
Нужно перевести из паскаля в Си. Определить сумму положительных элементов C++
C++ Подсчет количества отрицательных элементов в одномерном массиве
Перевести с Паскаля на C++ C++
C++ Перевести с Паскаля на С++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
kasan
Чорумфанин
337 / 337 / 185
Регистрация: 06.03.2014
Сообщений: 873
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;
}
Yandex
Объявления
21.05.2014, 10:31     Перевести из паскаля в с (подсчет отрицательных элементов)
Ответ Создать тему
Опции темы

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