Answered

Obtenha soluções para suas perguntas no Sistersinspirit.ca, a plataforma de Q&A mais rápida e precisa. Explore soluções abrangentes para suas perguntas de uma ampla gama de profissionais em nossa plataforma amigável. Descubra um vasto conhecimento de profissionais em diferentes disciplinas em nossa amigável plataforma de perguntas e respostas.

gostaria de saber os significado de cada linha/;Program Bidimensional;
Uses CRT;
var
tabela : Array [1..3,1..2] of Integer;
i, j,k : Integer;
achou : Boolean;
Begin
ClrScr;
for i := 1 to 3 do
for j := 1 to 2 do
Begin
Write ('Entre com o Valor i= ',i,' j= ',j,' = ');
ReadLn (tabela[i,j]);
End;
Write ('Qual numero voce deseja encontrar?');
ReadLn (k);
achou := False;
for i := 1 to 3 do
for j := 1 to 2 do
if tabela[i,j]=k then
Begin
WriteLn ('i=',i,' j=',j);
achou := True;
End;
if not(achou) then WriteLn ('O numero nao foi encontrado!');
ReadLn;
End.

Sagot :

Program Bidimensional;  ( nome do programa )
Uses CRT;  ( biblioteca onde é guardado o dado )
var  ( variavéis)
tabela : Array [1..3,1..2] of Integer; ( array é uma matriz onde são armazenados dados)
i, j,k : Integer; ( variável com valor inteiro )
achou : Boolean; 
Begin ( começo)
ClrScr; ( limpa a tela )
for i := 1 to 3 do  ( comando "for" que quer dizer "para" por ex,  para J igual a 1 até 3 "faça"
for j := 1 to 2 do 
Begin ( começo )
Write ('Entre com o Valor i= ',i,' j= ',j,' = ');  ( é o que aparece na tela do usuário )
ReadLn (tabela[i,j]); ( lê o que o usuário digitou )
End; ( fim do "for" )
Write ('Qual numero voce deseja encontrar?'); 
ReadLn (k); 
achou := False; 
for i := 1 to 3 do 
for j := 1 to 2 do 
if tabela[i,j]=k then 
Begin 
WriteLn ('i=',i,' j=',j); 
achou := True; 
End; 
if not(achou) then WriteLn ('O numero nao foi encontrado!'); ( if é comando " se" por ex, SE o número digitado for 3, aparece "o número não foi encontrado")
ReadLn; 
End.
Obrigado por escolher nossa plataforma. Estamos dedicados a fornecer as melhores respostas para todas as suas perguntas. Visite-nos novamente. Obrigado por escolher nosso serviço. Estamos dedicados a fornecer as melhores respostas para todas as suas perguntas. Visite-nos novamente. Visite o Sistersinspirit.ca novamente para obter as respostas mais recentes e informações dos nossos especialistas.