Заполнить массив десятичными цифрами целого числа

@egoruk100500 · Регистрация: 25.04.2019

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

Просьба перевести из pascal в c++

Pascal

ses crt;
var a:array [1..6] of byte;
    n: integer;
    i,kol:byte;
begin
repeat
 write ('n=');
 readln (n);
until (n<=999999) and (n>0);
kol:=0;
while n<>0 do
 begin
  inc(kol);
  a[kol]:=n mod 10;
  write(a[kol]:3);
  n:=n div 10;
 end;
readln;
end.

@zss · 25.04.2019, 13:33

См. ссылки внизу страницы

@art_artemios · 25.04.2019, 13:48

C++

    
#include <iostream>
using namespace std;
int main() {
 
int n;
cout << "Enter number of elements: ";
cin >> n;
int *z = new int[n];
int *res = new int[n];
 
cout << "\nFill new array[" << n << "]: ";
 
for(int i = 0; i < n; i++) {
    cout << "\narr[" << i << "] = ";
    cin >> z[i];
    res[i] = (z[i]/10) % 10;
}
 
cout << "\n===================================================================\n";
 
for(int i = 0; i < n; i++) cout << "Number " << z[i] << " with " << res[i] << " in tenths\n";
 
return 0;
}

Простейший код. Держи на здоровье!

@zss Модератор 13507 / 10757 / 6412 Регистрация: 18.12.2011 Сообщений: 28,712
	25.04.2019, 13:33	2
	См. ссылки внизу страницы 0

	25.04.2019, 13:48