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

Скиньте текст програми Задання 1. Створіть програму на вході маємо два списки і ціле число, якщо введене число менше 0, то до першого списку додається другий, інакше до другого перший. 

Алгоритм роботи.

Створіть список а (значення користувач вводить сам, використовуйте структуру a = [int(i) for i in input().split()])

Створіть список b.

Створіть змінну, яку користувач також буде вводити сам (int(input(«Введіть ціле число для умови: »)))

Перевірте чи введене число менше 0. Якщо умова виконується до першого списку додати другий, інакше навпаки.

if value < 0:

    print("Результат:", a + b)

else:

    print("Результат:", b + a)

Збережіть програму та перевірте правильність її виконання.

Задання 2. Cтворіть проект Магазин одягу. Згідно умови, у магазині одягу є гнучка система зміни цін. Кожного тижня товар змінював свою ціну згідно таблиці.

Створіть проект, у якому за введеною вартістю товару можна обчислити значення ціни товару протягом кожного тижня та вивести її на екран у вигляді таблиці (списку) значень. Зверніть увагу, щоб знайти результат збільшення ціни price на 1%, виконують дію price*1.01; щоб зменшити на 1%, виконують дію price*0.99.

Завдання 3. Створити проект, у якому є 1 кнопка, 1 багаторядкове поле введення інформації та 1 напис. Ім'я користувача вводиться у текстове поле. При клацанні кнопки даний текст заноситься у напис на формі.

Завдання 4. Знайти суму додатних елементів одновимірного масиву (таблиці) всі елементи якого є цілими числами. 

👇
Открыть все ответы
Ответ:
kvashenko403
kvashenko403
11.12.2021

from builtins import print

a = int(input())

b = int(input())

c = int(input())

d = int(input())

if (a + b + c + d) == (a * b * c * d):

  print('Сумма и произведения равны')

else:

  if (a + b + c + d) < (a * b * c * d):

      print('Cумма меньше произведения')

  else:

      print('Сумма больше произведения')

#2

sum = 0

for i in range(4):

  a = int(input())

  if a > 0:

      sum+=a

print(sum)

# 3

sum = 0

for i in range(4):

  a = int(input())

  if a < 0:

      sum += a

print(sum)

# 4

minus = 0

plus = 0

null = 0

for i in range(4):

  a = int(input())

  if a < 0:

      minus += 1

  else:

      if a > 0:

          plus += 1

      else:

          null += 1

print('Положительных {}, отрицательных {}, нулей {}'.format(plus, minus, null))

# 5

a = int(input())

b = int(input())

polusum = (a * b) / 2

ydvoen = 2 * a * b

if a > b:

  a = polusum

  b = ydvoen

else:

  b = polusum

  a = ydvoen

print(a, b)

# 6

z = []

for i in range(3):

  z.append(input())

if z[0] == min(z):

  z[0] = 0

else:

  if z[1] == min(z):

      z[1] = 0

  else:

      z[2] = 0

print(z)

#7

z = []

for i in range(4):

  z.append(int(input()))

print(max(z)-min(z))

# 8

M = 0

kvartal = 0

M = int(input())

if (M > 1) and (M < 4):

  kvartal = 1

  print('Квартал - ', kvartal)

else:

  if (M > 3) and (M < 7):

      kvartal = 2

      print('Квартал - ', kvartal)

  else:

      if (M > 6) and (M < 10):

          kvartal = 3

          print('Квартал - ', kvartal)

      else:

          if (M > 9) and (M < 13):

              kvartal = 4

              print('Квартал - ', kvartal)

if kvartal == 0:

  print('Введён неккоректный месяц')

# 9

list = ['крыса', 'корова', 'тигр', 'заяц', 'дракон', 'змея', 'лошадь', 'овца', 'обезьяна', 'петух', 'собака', 'свинья']

god = int(input())

opred = (god - 1995) % 12 - 1

print(list[opred])

Объяснение:

4,6(71 оценок)
Ответ:
arsen47305
arsen47305
11.12.2021
"Школьный вариант" (чтобы помучиться):
// PascalABC.Net 3.0б сборка 1066
var
  s1,s2:string;
  p,q:set of char;
  i:integer;
  c:char;
begin
  Write('Введите первую строку: '); Readln(s1);
  Write('Введите вторую строку: '); Readln(s2);
  p:=[]; q:=[];
  for i:=1 to Length(s1) do Include(p,s1[i]);
  for i:=1 to Length(s2) do Include(q,s2[i]);
  p:=p*q;
  for c:=' ' to Chr(255) do
    If c in p then Write(c,' ');
  Writeln
end.
 
Тестовое решение:
Введите первую строку: Карл у Клары украл кораллы
Введите вторую строку: Клара у Карла украла кларнет
  К а к л р у

Современный вариант:
// PascalABC.Net 3.0б сборка 1066
begin
  var s1:=ReadlnString('Введите первую строку: ');
  var s2:=ReadlnString('Введите вторую строку: ');
  Writeln('Общие символы в строках: ',s1.Intersect(s2).Sorted);
end.

Тестовое решение:
Введите первую строку:  Карл у Клары украл кораллы
Введите вторую строку:  Клара у Карла украла кларнет
Общие символы в строках: [ ,К,а,к,л,р,у]
4,6(31 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ