{"id":301,"date":"2014-12-30T16:39:28","date_gmt":"2014-12-30T15:39:28","guid":{"rendered":"http:\/\/www.valcon.it\/pascal\/?p=301"},"modified":"2014-12-30T16:39:28","modified_gmt":"2014-12-30T15:39:28","slug":"problemi-con-array-2","status":"publish","type":"post","link":"https:\/\/www.valcon.it\/pascal\/problemi-con-array-2\/","title":{"rendered":"Problemi con array 2"},"content":{"rendered":"<p>Con le seguenti dichiarazioni<\/p>\n<pre class=\"\">Const\r\n\u00a0 \u00a0 DIM=10;\r\nType\r\n\u00a0 \u00a0 VETTORE: Array[1..DIM] Of Real;\r\nVar\r\n\u00a0 \u00a0 V1, V2, V3: VETTORE;<\/pre>\n<p>completa gli esercizi seguenti<\/p>\n<pre class=\"\">Procedure Visualizza(v: VETTORE);\r\nVar\r\n \u00a0 i: Integer;\r\nBegin\r\n \u00a0 For i:=1 To DIM Do\r\n\u00a0 \u00a0 \u00a0 Writeln(i:5, ': ', v[i]:10:2);\r\nEnd;<\/pre>\n<pre class=\"\">Procedure Visualizza_Capovolto(v: VETTORE);<\/pre>\n<pre class=\"\">Procedure Visualizza_Quadrati(v: VETTORE);<\/pre>\n<pre class=\"\">Procedure Azzera(Var v: VETTORE); \/\/ modificato...<\/pre>\n<pre class=\"\">Procedure Capovolgi(Var v: VETTORE); \/\/ modificato...<\/pre>\n<p>Copia il contenuto di un array sorgente in un array destinazione<\/p>\n<pre class=\"\">Procedure Copia(vIN: VETTORE; Var vOUT: VETTORE);<\/pre>\n<pre class=\"\">Function Minimo(v: VETTORE): Real;\r\nVar\r\n \u00a0 i: Integer;\r\n \u00a0 m: Real;\r\nBegin\r\n \u00a0 m:=v[1];\r\n \u00a0 For i:=2 To DIM Do\r\n\u00a0 \u00a0 \u00a0 If(v[i] &lt; m) Then\r\n \u00a0 \u00a0 \u00a0 \u00a0 m:=v[i];\r\n \u00a0 Minimo:=m;\r\nEnd;<\/pre>\n<pre class=\"\">Function Massimo(v: VETTORE): Real;<\/pre>\n<pre class=\"\">Function Totale(v: VETTORE): Real;<\/pre>\n<pre class=\"\">Function Prodotto(v: VETTORE): Real;<\/pre>\n<pre class=\"\">Function Totale_Quadrati(v: VETTORE): Real;<\/pre>\n<pre class=\"\">Function Media(v: VETTORE): Real;<\/pre>\n<pre class=\"\">Function Mediana(v: VETTORE): Real;<\/pre>\n<p>Produce 2 risultati quindi non \u00e8 una funzione&#8230;<\/p>\n<pre class=\"\">Procedure Minimo_Massimo(v: VETTORE; Var min, max:Real);<\/pre>\n<p>Somma posizione per posizione i primi 2 array e salva nel terzo<\/p>\n<pre class=\"\">Procedure Totale2(vIN1, vIN2: VETTORE; Var vOUT: VETTORE);\r\nVar\r\n \u00a0 i: Integer;\r\nBegin\r\n\u00a0\u00a0 For i:=1 To DIM Do\r\n\u00a0 \u00a0 \u00a0 vOUT[i]:=vIN1[i]+vIN2[i];\r\nEnd;<\/pre>\n<p>Moltiplica posizione per posizione i primi 2 array e salva nel terzo<\/p>\n<pre class=\"\">Procedure Prodotti2(vIN1, vIN2: VETTORE; Var vOUT: VETTORE);<\/pre>\n<pre class=\"\">Function Uguali(vA, vB: VETTORE): Boolean;<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>Con le seguenti dichiarazioni Const \u00a0 \u00a0 DIM=10; Type \u00a0 \u00a0 VETTORE: Array[1..DIM] Of Real; Var \u00a0 \u00a0 V1, V2, V3: VETTORE; completa gli esercizi seguenti Procedure Visualizza(v: VETTORE); Var \u00a0 i: Integer; Begin \u00a0 For i:=1 To DIM Do \u00a0 \u00a0 \u00a0 Writeln(i:5, &#8216;: &#8216;, v[i]:10:2); End; Procedure Visualizza_Capovolto(v: VETTORE); Procedure Visualizza_Quadrati(v: VETTORE); Procedure &#8230; <a title=\"Problemi con array 2\" class=\"read-more\" href=\"https:\/\/www.valcon.it\/pascal\/problemi-con-array-2\/\" aria-label=\"Leggi di pi\u00f9 su Problemi con array 2\">Leggi tutto<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"_links":{"self":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts\/301"}],"collection":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/comments?post=301"}],"version-history":[{"count":1,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts\/301\/revisions"}],"predecessor-version":[{"id":302,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts\/301\/revisions\/302"}],"wp:attachment":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/media?parent=301"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/categories?post=301"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/tags?post=301"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}