Программа Pascal

[Ana345]

Программа Pascal

Добрый день! Нужна ваша помощь!
Дана задача Pascal мне нужно на языке С\С++.
Вот задача:

program Pr378_1;
var
   x : array [1..8] of real;
   y : array [1..8] of real;
   i, j, n : integer;
begin
   for i := 1 to 8 do
   begin
      read(x[i]);
      y[i] := 1;
   end;
 
  for i := 1 to 8 do
  begin
     for j := 1 to 8 do
     begin
        y[j] := y[j] * x[j];
        write(y[j]:6:2, ' ')
     end;
     writeln('');
  end;
 
  readln;
end.

Заранее благодарю!

 

[Vladimir_S]

Добрый день! Нужна ваша помощь! Дана задача Pascal мне нужно на языке С\С++.

Рад бы помочь, но вот беда: были у нас СИ-шники, да как-то постепенно улетучились, а я, увы, паскалист. Попробуйте поискать в Сети Паскаль-СИ конвертор, раньше они были, как сейчас — не знаю.

 

[Ana345]

Хорошо, поняла. Спасибо!