Создать графическое окно с розмерами XxY с использованием библиотеки Tkinter. Название окна.
2) Создать глобальную переменную Counter с начальным значением 0 и конечным N, отобразить это значение в графическом окне. Создать глобальную переменную State с начальным значением False и отобразить её значение в граф.окне.
3) Создать кнопку с обработчиком нажатия кнопки. При каждом нажатии кнопки увеличивать значение переменной Counter на 1, и инвертировать значение переменной State. Если значение переменной Counter достигнит порога M изменить фон отображения значения переменной Counter на красный.
4) Создать поле ввода Entry. В этом поле необходимо выводить значение порога М, что сравнивается с текущем значением переменной Counter.
5) Добавить у граф.окно виджет Slider. Связать текущее значение переменной Counter с Slider. Реализовать изменение текущего значения переменной Counter за счёт Slider.
Эка верста выросла (как Коломенская верста) .
За семь верст киселя хлебать.
Ты от дела на недельку, а оно от тебя на саженьку.
Видеть на сажень сквозь землю.
Загадка разгадка да семь верст правды.
Каждый купец на свой аршин мерит.
Прямой, будто аршин проглотил.
Семи пядей во лбу.
Сам с ноготок, а борода с локоток.
От горшка два вершка, а уже указчик.
Полено к полену - сажень.
Москва верстой далека, а сердцу рядом.
Любовь верстами не меряется.
Сто верст молодцу не крюк.
От слова до дела - целая верста.
Верстой ближе - пятаком дешевле.
Жили с локоть, а осталось с ноготь.
В чужих руках ноготок с локоток.
Дай с ноготок, запросит с локоток.
Семь аршин говядины да три фунта лент (о бессмыслице)
var
a: array of integer;
i, n, m: integer;
function simple(x:integer): boolean;
var
i: integer;
begin
Simple := false;
if x < 2 then exit;
if x mod 2 = 0 then exit;
i := 3;
while i <= sqrt(x) do
begin
if x mod i = 0 then exit;
i +=2;
end;
Simple := true;
end;
begin
write('Количество элементов массива :');readln(m);
SetLength(a, m);
while n <= m - 1 do
begin
if simple(i) then begin
a[n] := i;
n +=1;
end;
i +=1;
end;
a.println;
end.
Тестовое решение:
Количество элементов массива :25
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97