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

3. Створено список lst1=[3,4,5,6]. Додати до списку числовій елемент -10. Запишіть код програми та результат після виконання операції. (1 б.)
4. Виконати завдання. Змінимо значення 1-го елемента списку mylist на “комп’ютер”. Виправити
помилку у коді програми, записати результат. (1 б.)
>>> mylist=[’робот’,’школа’,’учень’]
>>> mylist[1]=’комп'ютер’
>>> mylist
[’робот’,’комп'ютер’,’учень’]
5. Дано список a=[1,2,3,4,5,0,7,8,9,10]. Яких значень набувають елементи списку b, якщо:
Заповнити таблицю. (3 б.)
Завдання Дія Результат виконання

а b=a[0:3] Вивести перші 3 елементи списку b=[1,2,3]
б b=a[6:] Вивести елементи списку починаючи з
елемента з номером 6 і до кінця

b=
в b=a Списку b присвоїти елементи списку a b=
г b=a[3] Вивести елемент списку з індексом 3 b=
ґ b=a[2:3]+[1,-2,0] Вивести зріз списку a довжиною в один

елемент та об’єднати списки

b=
д b=a*2 Подвоїти елементи списку a та записати

новий список b

b=

6. Дано код програми. Визначимо, скільки разів повторюються команди тіла циклу, та які це
команди. (2 б.)
s=0
a=4
for i in range(3):
s=s+a
a+=2
print('s=',s)
7. Дано список. Запишіть індекс кожного елемента. (1 б.)

індек
с
lst= 1
5
2 3 4 5
9
9

Показать ответ
Ответ:
manzharenko13
manzharenko13
29.03.2023 06:40

Объяснение:

На чистом паскале никак. Либо используя графические библиотеки (например, GraphABC в Pascal ABC.NET), либо, например Delphi.

GraphABC:

uses GrathABC;

var b: picture;

begin

b:= Picture.Create('1.png');

...

end.

Далее через процедуру OnKeyDown или OnKeyPress считываем ключ с клавиатуры, и если это 2, то показываем изображение.

Примерно это должно выглядеть так:

procedure OnKeyPress(key: integer);

begin

if key = 2 then b.Draw(10, 10);

end;

Delphi: на нём гораздо проще. Здесь есть уже готовая форма, и стандартные компоненты за визуальность).

Через компонент TImage (вкладка Additional) загружаем изображение, устанавливаем у изображения свойство Visible:= false. Далее через OnKeyPress главной формы считываем ключ, и если key = 2, то Image.Visible:= true;

0,0(0 оценок)
Ответ:
kdjdjd1Dndnd
kdjdjd1Dndnd
19.11.2020 12:38
Для того чтобы узнать какое число стоит на 301 месте введем следующие обозначения: А = 0,  Е  = 1, У = 2. Тогда получим:
1) 000000, (0)
2) 000001, (1)
3) 000002, (2)
4) 000010, (3)
...
301) ... (300)
а это получаются числа записанные в троичной системе счисления.
На 301 месте будет стоять число равное в десятичной системе 300
Переведем число 300 из десятичной системы в троичную, получим:
300 : 3 = 100 - остаток 0
100 : 3 = 33 - остаток 1
33 : 3 = 11 - остаток 0
11 : 3 = 3 - остаток 2
3 : 3 = 1 - остаток 0
1 : 3 = 0 - остаток 1
т.е. получаем число 102010 в троичной системе счисления.
Подставив обратно наши буквы получим ответ: ЕАУАУА.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота