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

Python 1. Надрукувати таблицю значень 1, 2, …​ n доларів США у переведенні на гривні за поточним курсом k (значення курсу вводиться з клавіатури).
2. Користувачем вводиться два імені.Використовуючи конструкцію розгалуження програма повинна вивести імена в алфавітному порядку.
Вхідні дані:
Guido van Rossum
Dennis Ritchie
Вихідні дані:
Dennis Ritchie
Guido van Rossum
3. Напишіть програму, яка запитує користувача номер в діапазоні від 1 до 7. Програма повинна відображати відповідний день тижня, де 1 -це понеділок, а 7 -неділя.Програма має враховувати варіант, коли користувач вводить номер, що знаходиться за межами діапазону від 1 до 7.
Вхіднідані:
5
10
2
Вихідні дані:
Friday
There is no such day of the week.
Tuesday
4. Дано натуральне число. Визначити,чи закінчується воно цифрою 5.
Вхідні дані:
1 2 3 9 5
1 2 3
Вихідні дані:
True
False

👇
Ответ:
Gobbygo
Gobbygo
07.06.2022

1.  

n=int(input())

k=float(input())

for i in range(1,n+1):

   print(i, "USD =", i*k, "UAH")

2.

i=input()

mas=[]

while i!="":

   mas.append(i)

   i=input()

mas.sort()

for z in mas:

   print(z)

3.

i=input()

mas=[]

while i:

   mas.append(int(i))

   i=input()  

slvr=["Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday"]

for x in mas:

   if x>7 or 1>x:

       print("There is no such day of the week.")

   else:

       print(slvr[x-1])

4.

i=input()

mas=[]

while i:

   mas.append(int(i))

   i=input()

 

for x in mas:

   print(str(x)[-1] is "5")

4,6(80 оценок)
Открыть все ответы
Ответ:
WhiteFix
WhiteFix
07.06.2022
Программа ищет и выводит все трехбуквенные слова, содержащие русские и/или латинские буквы в обоих регистрах. Слова могут разделяться любым количеством любых символов, кроме символа подчеркивания.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Вводите:');
  var m:=s.Matches('\b\w{3}\b');
  if m.Count>0 then m.Println
  else Writeln('Нет трехбуквенных слов')
end.

Пример:
Вводите: Как найти все слова, где букв - три?
Как все где три
4,5(50 оценок)
Ответ:
noragami2003
noragami2003
07.06.2022
Var s,tmp:string;
     i,n:integer;
     flag,word:boolean;
function letter (const let:char):boolean;
 begin
   if ((let>='a') and (let<='z')) or ((let>='A') and (let<='Z')) then letter:=true
     else letter:=false;
 end;
begin
  readln (s);
  s:=s+' ';
  n:=length(s);
  flag:=false;
  for i:=1 to n do
   begin
     if (letter(s[i])) and (not flag) then
      begin 
        flag:=true;
        tmp:='';
        word:=false;
      end else if (not letter(s[i])) and (flag) then
      begin 
       flag:=false;
       if (word) and (not (tmp='')) then writeln (tmp);
      end;
     if (flag) then
      begin 
        tmp:=tmp+s[i];
        if (s[i]='k') then word:=true;
      end; 
   end;
end.
4,7(4 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ