Java

Program sandalia; //nomedo programa

Uses crt;

type = calcado = string begin modelo, genero, solado; integer: tamanho; end;

calcado:array[1..2] of calcado; // vetor do programa que vai fazer o trem rodar ‘’sozinho’’

Var i:integer; // variavel do vetor

Begin // começar o programa

for i:=1 to 2 do begin // para igual 1 até 2 faça

Writeln (‘qual o modelo do calcado?’); // tu digita o que quer

readln (calcado[i].modelo); // pega a variavel (que vc digitar) modelo dentro da variavel modelo posicao ‘i’ que ta

dentro da variavel calcado

Writeln (‘O calcado é masc, fem ou uni?’);

readln (calcado[i].genero); // pega a variavel (que vc digitar) modelo dentro davariavel genero ‘i’ que ta dentro da variavel calcado

Writeln (‘qual o tipo de solado do calcado?’);

readln (calcado[i].solado); // pega a variavel (que vc digitar) modelo dentro da variavel solado ‘i’ que ta

dentro da variavel calcado

Writeln (‘qual o tamanho do calcado?’);

readln (calcado[i].tamanho); end;

// pega a variavel (que vc digitar) dentro da variavel tamanho ‘i’ que ta dentro da variavel calcado

// esse end termina o begin do for.

For i:=1 to 2 do Writeln (calcado[i].modelo); writeln (calcado[i].genero)

Writeln(calcado[i].solado); writeln(calcado[i].tamanho);

End. // esse for vai mostrar o ‘’cadastro’’ preenchido.

Program produto; uses crt; type = cadastro = string begin nome, codigo; integer qtd; float preco;

Prdt:array[1..5] of cadastro; var i:integer;

Begin for 1 to 5 do begin

Writeln(‘Nome do produto’); readln(cadastro.nome);

Writln(‘codigo do produto’); readln(cadastro.codigo);

Writeln(‘Quantidade no estoque’); readln(cadastro.qtd);

Writeln(‘Qual o preco doproduto?’) readln(cadastro.preco);

For 1 to 5 do begin writeln(cadastro[i].nome)

writeln(cadastro[i].codigo); writeln(cadastro[i].qtd); writeln(cadastro[i].preco);