Var a:array[1..4,1..6] of integer; i,j,p,n:integer; begin p:=1; n:=1; for i:=1 to 4 do for j:=1 to 6 do read(a[i,j]); for j:=1 to 6 do p*=a[3,j]; writeln(p); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
