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

Python 1) Программа получает на вход количество чисел в последовательности (натуральное число), а затем сами числа (целые). Найдите произведение чисел последовательности не кратных 5

2) Программа получает на вход количество чисел в последовательности (натуральное число), а затем сами числа (целые). Найдите количество чисел последовательности оканчивающихся на четную цифру

3) Вводятся два натуральных числа а и с. На отрезке от 0 до а, найдите все числа, последняя цифра которых кратна с

Python

👇
Ответ:
Алиса547828
Алиса547828
27.10.2021

1)

# На вход: кол-во чисел, сами числа

# Выход: кол-во чисел не кратных 5

count:int = input('Кол-во чисел?: ')

ints = []

for i in range(int(count)):

   ints.append(input('Число ' + str(i+1) + ': '))

result = []

for i in ints:

   if int(i) % 5 != 0:

       result.append(i)

print(result)

2)

# На вход: кол-во чисел, сами числа

# Выход: кол-во чисел в конце которых чётное число

count:int = input('Кол-во чисел?: ')

ints = []

for i in range(int(count)):

   ints.append(input('Число ' + str(i+1) + ': '))

result = []

for i in ints:

   if int(i) % 2 == 0:

       result.append(i)

print(result)

3)

# На вход: числа A и C

# Выход: числа, последняя цыфра которых кратна С

A = input('Отрезок от 0 до ')

C = input('Найти числа, кратные ')

result = []

for i in range(0, int(A)):

   if i % int(C) == 0:

       result.append(i)

   

print(result)

4,6(49 оценок)
Открыть все ответы
Ответ:
даша3643
даша3643
27.10.2021

Составим полный код к нашему заданию а:

program ex1;

uses crt;

var

 k, a: integer;

begin

 k := 1;a := 12;

 while a < 100 do

 begin

   a := 2 * a - 4;

   Writeln('Значения a ', a);

   k := k + 1;

   Writeln('Значения k ', k);

 end;

end.

После выполнения программы получаем такие значения:

Значения a 20

Значения k 2

Значения a 36

Значения k 3

Значения a 68

Значения k 4

Значения a 132

Значения k 5

Составим полную программу к заданию б:

program ex2;

uses crt;

var

 k, a, s: integer;

begin

 s := 0;a := 1;k := 1;

 while a < 50 do

 begin

   s := s + a;

   Writeln('Значения s ', s);

   k := k + 1;

   Writeln('Значения k ', k);

   a := k * k;

   Writeln('Значения a ', a);

 end;

end.

После выполнения программы получаем такие значения:

Значения s 1

Значения k 2

Значения a 4

Значения s 5

Значения k 3

Значения a 9

Значения s 14

Значения k 4

Значения a 16

Значения s 30

Значения k 5

Значения a 25

Значения s 55

Значения k 6

Значения a 36

Значения s 91

Значения k 7

Значения a 49

Значения s 140

Значения k 8

Значения a 64

4,4(77 оценок)
Ответ:
August333
August333
27.10.2021

Составим полный код к нашему заданию а:

program ex1;

uses crt;

var

 k, a: integer;

begin

 k := 1;a := 12;

 while a < 100 do

 begin

   a := 2 * a - 4;

   Writeln('Значения a ', a);

   k := k + 1;

   Writeln('Значения k ', k);

 end;

end.

После выполнения программы получаем такие значения:

Значения a 20

Значения k 2

Значения a 36

Значения k 3

Значения a 68

Значения k 4

Значения a 132

Значения k 5

Составим полную программу к заданию б:

program ex2;

uses crt;

var

 k, a, s: integer;

begin

 s := 0;a := 1;k := 1;

 while a < 50 do

 begin

   s := s + a;

   Writeln('Значения s ', s);

   k := k + 1;

   Writeln('Значения k ', k);

   a := k * k;

   Writeln('Значения a ', a);

 end;

end.

После выполнения программы получаем такие значения:

Значения s 1

Значения k 2

Значения a 4

Значения s 5

Значения k 3

Значения a 9

Значения s 14

Значения k 4

Значения a 16

Значения s 30

Значения k 5

Значения a 25

Значения s 55

Значения k 6

Значения a 36

Значения s 91

Значения k 7

Значения a 49

Значения s 140

Значения k 8

Значения a 64

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