Перевод с паскаля на С++

@helpme_plz · Регистрация: 07.02.2012

Author24 — интернет-сервис помощи студентам

Даны два массива A и B одинакового размера N. Сформировать новый массив C того же размера, каждый элемент которого равен максимальному из элементов массивов A и B с тем же индексом.}

Pascal

Program Array53;
const
n=10;
var
a:array [1..n]of integer;
b:array [1..n]of integer;
c:array [1..n]of integer;
i:integer;
Begin for i:=1 to n do 
begin
a[i]:=random(N);
b[i]:=random(N);
end;
for i:=1 to n do
begin
if(a[i]>b[i])then c[i]:=a[i]
else c[i]:=b[i];
end;
for i:=1 to n do write(c[i],' '); end.

@rangerx · 20.02.2012, 21:45

C++

#include <iostream>
#include <ctime>
#include <cstdlib>
 
int main()
{
  const size_t n = 10;
 
  int a[n], b[n];
  
  std::srand(std::time(NULL));
  for(size_t i = 0; i < n; ++i) 
  {
    a[i] = std::rand() % n;
    b[i] = std::rand() % n;
  }
 
  int c[n];
 
  for(size_t i = 0; i < n; ++i) 
  {
    if(a[i] > b[i]) c[i] = a[i];
    else c[i] = b[i];
  }
 
  for(size_t i = 0; i < n; ++i) 
    std::cout << c[i] << ' '; 
  std::cout << "\n";
}

@oralov96 · 03.04.2015, 20:30

rangerx, помогите перевести программку

@zss · 03.04.2015, 22:02

oralov96, Если бы Вы посмотрели профиль, то увидели бы, что
rangerx не появлялся на форуме с

Последняя активность: 28.02.2014 04:29

И непонятна Ваша просьба. Данная программа уже переведена.
Если нужна другая, то создайте отдельную тему.

@oralov96 2 / 2 / 0 Регистрация: 24.02.2015 Сообщений: 79 Записей в блоге: 2
	03.04.2015, 20:30	3
	rangerx, помогите перевести программку 0

@zss Модератор 13498 / 10752 / 6407 Регистрация: 18.12.2011 Сообщений: 28,692
	03.04.2015, 22:02	4
	oralov96, Если бы Вы посмотрели профиль, то увидели бы, что rangerx не появлялся на форуме с Последняя активность: 28.02.2014 04:29 И непонятна Ваша просьба. Данная программа уже переведена. Если нужна другая, то создайте отдельную тему. 0

Опции темы