Cerința
6 puncteÎntr-o seră se folosesc vase pătrate, care conțin câte o singură floare (lalea, frezie sau narcisă). Vasele sunt așezate pe trei rânduri și sunt aliniate ca în exemplu. Patru flori de același tip formează un romb dacă vasele în care se află sunt dispuse în jurul unui alt vas, cu care fiecare are în comun câte o latură. Variabilele j și ok sunt întregi, iar variabila a este un tablou bidimensional cu 3 linii și 15 coloane, cu elemente de tip char, în care fiecare linie, în ordine, memorează succesiunea de flori aflate pe un rând al serei, notându-se cu L lalelele, cu F freziile și cu N narcisele. Fiecare linie a tabloului corespunde, în ordine, unui rând de vase din seră. Liniile și coloanele sunt numerotate începând de la 1. Scrieți secvența Pascal de mai jos, înlocuind punctele de suspensie astfel încât, în urma executării secvenței obținute, variabila ok să aibă valoarea 1 dacă florile formează cel puțin un romb, sau valoarea 0 în caz contrar. Exemplu: în urma executării secvenței pentru tabloul de mai jos, ok=1 (sunt evidențiate 4 romburi).
ok:=........; for j:=.....to .....do ..................
L L L N L F F F N F N F N F F N L L L N L L F F F F N F N F F N L F L N F L F F N L F F N
(6p.)
