М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
мадина3031
мадина3031
04.08.2021 07:39 •  Информатика

ів,до іть. python

Створити програму «Валютний конвертер». Створити вікно за зразом.
Ми повинні ввести кількість гривень і вибрати в яку валюту конвертувати.
Після натискання на кнопку, повинно з’явитися вікно з результатом.
Підказка 1. Створит и групу перемикачів
Підказка 2. Створити розгалуження ( використовувати тип float)
Підказка 3. Не забутьте для вікна повідомлення вказати модуль from tkinter import messagebox

👇
Ответ:
leraaleksan
leraaleksan
04.08.2021

from tkinter import *

from tkinter import messagebox

from tkinter import ttk

import math

import sys

root = Tk()

root.title("Конвертер валют: перевод рублей в $ и евро")

bttn_list = [

"7", "8", "9","C", "=","Exit", "+",

"4", "5", "6","-","*", "/", ".",

"1", "2", "3",

"(", ")","EUR","USD" ]

r = 1

c = 0

for i in bttn_list:

rel = ""

cmd=lambda x=i: calc(x)

ttk.Button(root, text=i, command = cmd, width = 9).grid(row=r, column = c)

c += 1

if c > 6:

c = 0

r += 1

calc_entry = Entry(root, width = 33)

calc_entry.grid(row=0, column=0, columnspan=5)

#логика калькулятора

def calc(key):

global memory

if key == "=":

#исключение написания слов

str1 = "-+0123456789.*/)("

if calc_entry.get()[0] not in str1:

calc_entry.insert(END, "First symbol is not number!")

messagebox.showerror("Error!", "You did not enter the number!")

#исчисления

try:

result = eval(calc_entry.get())

calc_entry.insert(END, "=" + str(result))

except:

calc_entry.insert(END, "Error!")

messagebox.showerror("Error!", "Check the correctness of data")

#очищение поля ввода

elif key == "C":

calc_entry.delete(0, END)

elif key == "±":

if "=" in calc_entry.get():

calc_entry.delete(0, END)

try:

if calc_entry.get()[0] == "-":

calc_entry.delete(0)

else:

calc_entry.insert(0, "-")

except IndexError:

pass

elif key == "EUR":

calc_entry.insert(END, "=" + str(77.04*(int(calc_entry.insert(

elif key == "USD":

calc_entry.insert(END, "=" + str(65.84*(int(calc_entry.insert(

pass

elif key == "Exit":

root.after(1,root.destroy)

sys.exit

elif key == "(":

calc_entry.insert(END, "(")

elif key == ")":

calc_entry.insert(END, ")")

else:

if "=" in calc_entry.get():

calc_entry.delete(0, END)

calc_entry.insert(END, key)

root.mainloop()

Объяснение:

как-то так

4,5(36 оценок)
Открыть все ответы
Ответ:
Camelia1980
Camelia1980
04.08.2021
Что-то меня глючит. Я же вроде как отвечал...

dim years
years = inputbox("Введите ваш возраст")
if years = 1 then msgbox("Мне 1 год") end if
if years = 2 then msgbox("Мне 2 годa") end if
if years = 3 then msgbox("Мне 3 годa") end if
if years = 4 then msgbox("Мне 4 годa") end if
if (years >= 5) and (years <= 19) then msgbox("Мне "+cstr(years)+" лет") end if

if years >= 20 then
dim s
s = "Мне "+cstr(years)
if (years mod 10 = 1) then s = s + " год" end if
if (years mod 10 >= 2) and (years mod 10 <= 4) then s = s + " годa" end if
if (years mod 10 >= 5) and (years mod 10 <= 9) then s = s + " лет" end if
if (years mod 10 = 0) then s = s + " лет" end if
msgbox(s)
end if

VBS
4,6(45 оценок)
Ответ:
Aysun115
Aysun115
04.08.2021
Написал на VBS, тот же бейсик, который есть в школах

dim years
years = inputbox("Введите ваш возраст")
if years = 1 then msgbox("Мне 1 год") end if
if years = 2 then msgbox("Мне 2 годa") end if
if years = 3 then msgbox("Мне 3 годa") end if
if years = 4 then msgbox("Мне 4 годa") end if
if (years >= 5) and (years <= 19) then msgbox("Мне "+cstr(years)+" лет") end if

if years >= 20 then
dim s
s = "Мне "+cstr(years)
if (years mod 10 = 1) then s = s + " год" end if
if (years mod 10 >= 2) and (years mod 10 <= 4) then s = s + " годa" end if
if (years mod 10 >= 5) and (years mod 10 <= 9) then s = s + " лет" end if
if (years mod 10 = 0) then s = s + " лет" end if
msgbox(s)
end if
4,8(81 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ