дан двух мерный массив С(i,j) i=1,2,....,10, j=1,2,........,20, состоящий из вещетвеных чисел, составить алгоритм и программу подсчета суммы элементов находящихся в четных строках массива
результат представить ввиде веторных чисел
из-за этой задачи я завалил экзамен
1) http://forum.pascal.net.ru/index.php?showtopic=2694
2) решение твоей задачи
s := 0;
i := 2;
while(i <= n) do begin
for j := 1 to m do s := s + c[i,j];
inc(i,2);
end;
подредактируйте пиз!
program eczamen;
uses crt;
var
c:array [1..10,1..20] of real;
a:array [1..5] of real;
i,j:real;
begin
for i:=1 to 10 do;
for j:=1 to 20 do;
write ('vvedite element [',i,',j,'] massiva');
readln (c[i,j]);
end;
begin
for i:=1 to 5 do
a[i]:=0;
for i:=1 to 5 do
for j:=1 to 20 do
a[i]:=a[i]+c[i*2,j];
for i:= 1 to 5 do
writeln (a[i]);
end.
Компилятор тебе на что?
program eczamen;
uses crt;
var
c:array [1..10,1..20] of real;
a:array [1..5] of real;
i,j: integer; { <--- Здесь особенно внимательно }
begin
for i:=1 to 10 do
for j:=1 to 20 do begin
write ('vvedite element [',i,',',j,'] massiva'); { <--- и здесь тоже }
readln (c[i,j]);
end;
for i:=1 to 5 do begin
a[i]:=0;
for j:=1 to 20 do
a[i]:=a[i]+c[i*2,j];
end;
for i:= 1 to 5 do
writeln (a[i]);
end.
может быть я на этом форуме самый тупой но все же что такое компилятор и где он у меня и почему там особено внимательно!?
а еще меня вопрос интересует! где ты ущишся или учился!
а еще меня вопрос интересует! где ты ущишся или учился!
А ты где программы свои запускаешь? Вот это и есть компилятор...