Кто может переписать или подсказать как с паскаля сделать в С

[korvi21]

Задан двухмерный массив вещественных чисел (квадратная матрица A размером N x N (6<=N<=10), что содержит действительные элементы:Найти произведение наибольших элементов каждой сроки матрицы и их координаты.

uses crt;
var x:array[1..10,1..10] of real;
i,j,n,ind:integer; pr,max:real;
begin
randomize; clrscr;
writeln('Введите размерность массива* <= 10');
readln(n);
for i:=1 to n do
begin
for j:=1 to n do
begin
x[i,j]:=random*10-5;
write(x[i,j]:6:2);
end;
writeln;
end;
writeln; pr:=1;
for i:=1 to n do
begin
max:=x[i,1];
for j:=2 to n do
if x[i,j]>max then begin max:=x[i,j]; ind:=j; end;
writeln('‚В ',i,' строке максимальным является ',ind,' элемент, равный =',max:0:2);
pr:=pr*max;
end;
writeln('Произведение макс. зн. = ',pr:0:2);
readkey;
end.

[Lizaard]

жесть конечно исходный код, могу переписать за умеренную плату)

[AlexDark]

Шо тут жесткого то функции поменять... делов то

#include<conio.h>
#include<time.h>
#include<stdio.h>
#include<stdlib.h>



int main()
{
double X [10][10];
int i,j,n=0,ind=0;
double pr=1,max=0;
srand(time(0));
do
{
system("cls");
printf("Enter array size* <= 10");
scanf("%d",&n);
}while(n>=10||n<2);
for (i=0;i<n;i++)
{
	for (j=0;j<n;j++)
	{
		X[i][j]=rand()*100-5;
		printf("%10.4lf   ",X[i][j]);
	}
	printf("\n");
}
printf("\n"); pr=1;
for (i=0;i<n;i++)
{
	max=X[i][1];ind=0;
	for (j=1;j<n;j++)
	{
		if (X[i][j]>max) { max=X[i][j]; ind=j;}
	}
	printf("In %d string max element is %d-th element, it's = %10.4lf\n",i+1,ind+1,max);
	pr=pr*max;
}
printf("Product of max elements = %10.4lf\n",pr);

system("pause");
}