gisaapereira

Ah sim, então, não consigui interpretar o exercicio de forma correta, muito obrigada ;D consegui*

{25) Ler uma matriz SOMA 4x4, calcular e escrever as seguintes somas: a) da linha 3 da coluna 2 c) de todos os elementos da matriz} Program Pzim ; var soma: array[1..4,1..4] of integer; i,j,s : integer; Begin for i:=1 to 4 do begin for j:=1 to 4 do begin writeln(' Escreva os numeros da matriz',i,j); readln(soma[i,j]); end;end; s:=0; for i:=1 to 4 do begin for j:=1 to 4 do s:=s+1; end; Begin writeln(' Soma da matriz',s); end; End. PS: Gente eu fiz este programa mais não tenho ideia como faço pra somar a linha tres e a coluna dois, só consegui fazer a soma de todos os elementos no caso item c, podem me ajudar?

obrigada ggenteee

Obrigada

obggg simon foi de grande ajuda

//8) Ler um vetor W de 10 elementos, depois ler um valor V. Contar e escrever quantas vezes o valor V ocorre //no vetor W e escrever também em que posições (índices) do vetor W o valor V aparece. Caso o valor V não //ocorra nenhuma vez no vetor W, escrever uma mensagem informando isto. Program Pzim ;var w: array[1..10] of integer; s,i,v:integer; Begin for i:=1 to 10 do begin w[i]:=i; end; begin writeln(' escreva o valor de v'); readln(v); end; s:=0; for i:=1 to 10 do if w[i]=v then s:=s+1 else write(' o valor não aparece nenhuma vez no vetor w'); for i:=1 to 10 do write(' o valor v aparece',s,' vezes'); // como faço pro indice em que v aparecer, ser mostrado???? End. Como faço pra escrever em que indice está o numero? tenho dificuldades nesta parte de interpretação

Muito obrigada!

Alguém conhece um bom livro para iniciante que programa no pascalzim? Sou estudante de engenharia e tenho fundamentos de programação 1, e necessito de ajuda.

O que fiz errado: Inicializante em programação, o que eu fiz de errado? //12) Ler dois vetores: R de 5 elementos e S de 10 elementos. Gerar um vetor X de 15 elementos cujas 5//primeiras posições contenham os elementos de R e as 10 últimas posições, os elementos de S. Escrever o//vetor X.Program Pzim ;var r: array[1..5] of integer; s: array[1..10] of integer; x: array[1..15] of integer; i: integer; Begin for i:= 1 to 5 do begin r[i]:=i; end; for i:=1 to 10 do begin s[i]:=i; end; for i:=1 to 15 do x[i]:=(r[i]+s[i]) ; for i:=1 to 15 do writeln(x[i]); End.