Найти и исправить ошибки, в ответ - записать вводимые значения и результат Пример 1: program a1; var k, m, day: intiger; Dat: array [17] of intiger; begin Dat [1]:=7; Dat [2]:=9; Dat [3]:=10; Dat [4]:=8; Dat [5]:=6; Dat [6]:=7; Dat [7]:=10; Day:= 1 m:=Dat [1]; for k:=2 to 7 do if Dat[k] > m then begin m:= Dat[k]; day:=k end; write (day) end. Пример 2: program a1; var k, m, count; integer; Dat: array [1...7] of integer; begin. Dat [1]:=3; Dat [2]:=-1; Dat [3]:=2; Dat [4]:=0; Dat [5]:=0; Dat [6]:=4; Dat [7]:=-2; count:= 0 for k:=1 to 7 do if Dat[k] >=0 then count:=count + 1 writi (count); end. Пример 3: program a1; var a, b, c, f, s: byte; begin readln (a); b:= a div 100; c:= a mod 100; d:= c div 10; f:= c mod 10; s:= b+d+f; if (s mod 2)=0 then writln ('четное ) else writeln ('не четное'); end

1)

Ошибкa -> исправленное:

intiger -> integer

array[17] of intiger -> array[1..7] of integer;

Day:=1 -> day:= 1;

day:= k -> day:=k;

write(day) -> write(day);

выведет 3

2)

var k,m,count; -> var k,m,count:

array[1...7] -> array[1..7]

begin. -> begin

count:= 0 -> count:= 0;

count:= count + 1 -> count:= count + 1;

writi(count); ->write(count);

Выведет 5

3)

var a,b,c,f,s -> var a, b, c, d, f, s

writln -> writeln

end -> end.

вводим 1234

результат "не четное"

import tkinter as tk  

class Form(tk.Frame):

   def __init__(self, root):

       super().__init__(root)

       self.master = root

       self.master.title('Window #1')

       self.master.resizable(False, False)

       self.master.geometry('500x600')

       self.build()

   def build(self):

       frame = tk.Frame(self, width = 500, height = 600, bg = 'green')

       frame.pack()

def main():

   root = tk.Tk()

   form = Form(root)

   form.pack()

   root.mainloop()

if __name__ == '__main__':

   main()

Объяснение:

Будь ласка, уточняйте на якій мові програмування потрібно написати програму. Для прикладу я напишу на С++. Но алгоритм такий буде будь-де.

int N = 0;

while(N != 0){ //Робота програми буде виконуватись до тих пір, поки не введуть 0. Цього нема в умові но на всякий напишу

cout << "Введіть N";

cin >> N;

cout << endl << endl; // Просто пробіли, для того щоб гарно виглядало

if( (N % 2) != 0) cout << N*N << " "; // Якщо число не парне тоді ми підносимо його до квадрату і записуєм. Якщо не парне, тоді нічого не робимо.

}