Технология выполнения индивидуальных заданий. Часть 1 - 36 стр.

UptoLike

ВУЗ: 

ЮФУ | Ростов-на-Дону

Составители: 

Рубрика: 

36
begin
writeln('Введите размеры массива ');
readln(n,m);
writeln('Введите элементы ');
for i:=1 to n do
for j:=1 to m do
read(a[i,j]);
To_Vect(n,m,a,b);
for i:=1 to n do
write(b[i]:7:3,' ');
writeln
end.
Тестовые примеры
1) n = 2, m = 3,
⎟
⎟
⎠
⎞
⎜
⎜
⎝
⎛
=
6 5 4
3 2 1
a
b =( 0.000 0.000)
2) n = 2, m = 3,
⎟
⎟
⎠
⎞
⎜
⎜
⎝
⎛
=
4 5 6
3 2 8
a
b = ( 5.000 9.000)
3) n = 2, m = 5,
⎟
⎟
⎠
⎞
⎜
⎜
⎝
⎛
=
7- 30 1- 15 3
15 10 2- 7 1
a
b = ( 0.000 0.000)
4) n = 2, m = 5,
⎟
⎟
⎠
⎞
⎜
⎜
⎝
⎛
=
10 15 1- 30 12
8 7- 10 2- 15
a
b = ( 18.000 25.000)

Страницы