3. Знайдіть і виправте помилки в програмі. Придумайте до неї умову задачі. Program Z1;Uses CRT;Var day:boolean;Clrscr;BeginWrite (‘Введіть номер дня тижня:’);Readln (day);Case d of :1: write (‘Понеділок’);2 :write (‘Вівторок’);3: write (‘Середа’);4: write (‘П’ятниця’);5: write (‘Четвер’);6: write (‘Субота’);7: write (‘Неділя’);End;ReadlnEnd.