В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
bekahasanov
bekahasanov
06.02.2023 11:17 •  Информатика

1) Категории функций для решения задач
Все четырёхбуквенные слова, составленные из букв А, Л, Г, О, Р, И, Т, М записаны в алфавитном порядке и пронумерованы, начиная с 1.

Начало списка выглядит так:

1.

2. АААГ

3. АААИ

4. АААЛ

5. АААМ

6. АААО

7. АААР

8. АААТ

9. ААГА

...

Под каким номером в списке идёт первое слово, которое начинается с букв ИГ?

Функцию какой категории можно использовать для решения этой задачи в электронных таблицах?

2) Ученик составляет 5-буквенные слова, в которых встречаются только буквы А, Б, В, Г, причём буква А появляется ровно 1 раз. Каждая из других допустимых букв может встречаться в слове любое количество раз или не встречаться совсем. Словом считается любая допустимая последовательность букв, не обязательно осмысленная. Сколько существует таких слов, которые может написать ученик?

Функцию какой категории можно использовать для решения этой задачи в электронных таблицах?

Показать ответ
Ответ:
ylau2006g
ylau2006g
05.04.2020 08:03

ответ:

. в нужно вывести все составные числа из промежутка [2; n]. код программы:

program lab3;

var i,n,j,s,l: integer;

m: real;

begin

readln (n);

for i: =2 to n do

begin

s: =trunc (sqrt (i));

for l: =2 to s do

begin

m: = i mod l;

if m=0 then

write (' ',i);

end;

end;

end.

но проблема - как только s становится больше 2, составные числа начинают несколько раз повторятся, т.к., например 12 делится и на 2 и на 3. вопрос: как мне сделать выход из цикла после первого успешного деления?

var

i, n, j, s, l: integer;

m: real;

begin

readln(n);

for i : = 2 to n do

begin

s : = trunc(sqrt(i));

for l : = 2 to s do

begin

m : = i mod l;

if m = 0 then

begin

write(' ', i);

break;

0,0(0 оценок)
Ответ:
vprasckowya
vprasckowya
29.09.2022 21:43

взял ответ от человека так что не судите стора

a = int(input('Введите длину => '))

b = int(input('Введите ширину => '))

print('S =', a * b)

print('P =', 2 * (a + b))

Задача 1:

a = int(input('Введите число байтов => '))

print(a * 1024, 'килобайт')

Задача 2:

a = int(input('Введите диаметр окружности => '))

print('L =', 3.14 * a)

Задача 3 (что то не так с тестами в твоём задании или с условием):

a = int(input('Введите первое число => '))

b = int(input('Введите второе число => '))

c = int(input('Введите третье число => '))

print('Среднее арифметическое =>', (a + b + c) / 3)

Задача 4:

a = int(input('Введите радиус окружности => '))

print('L =', 6.28 * a)

print('S =', 3.14 * a ** 2)

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота