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

ів! 1. Дано список а[34,5,6,2,45,107,67,4,6,100,5]
2. Вивести мінімальний елемент списку.
3. Вивести елемент під номером 4.
4. Порахувати, який елемент повторюється найбільшу кількість разів.
5. Визначити довжину списка.
6. Елементи більші за 10 замінити 0.
7. Обчислити суму трьоззначних чисел.
8. Створити два довільних списка.
9. Видалити з першого списку другий елемент. Змінити у другому списку останній об'єкт.
10. Створити новий список злиттям наявних.
11. Отримати зріз створеного списку, що містить частини обох початкових списків.
12. Додати до зрізу два елементи: один на початок, інший - у кінець.
До іть, будь ласка.
Потрібно здати до 07.12.2021.

👇
Ответ:
12345678910446638
12345678910446638
11.01.2020

2)print (min(a))

3)print (a[3])

4)не знаю

5)print (len(a))

6)не знаю

4,8(95 оценок)
Открыть все ответы
Ответ:
ZloYDedyskA
ZloYDedyskA
11.01.2020
Uses graphABC;procedure samolet(x:integer);
begin
setpencolor(clblack);
line(3+x,160,3+x,200);     // зад
line(3+x,160,30+x,180);
line(3+x,200,88+x,205);
line(30+x,180,100+x,175);
line(125+x,176,170+x,200);
line(170+x,200,172+x,202);
line(172+x,202,170+x,204);
line(170+x,204,115+x,205);
line(120+x,195,85+x,255);   //крыло
2line(85+x,255,75+x,258);
line(75+x,258,90+x,195);
line(95+x,175,105+x,125);       // крыло
line(105+x,125,116+x,128);
line(125+x,175,116+x,128);
setpencolor(clblue);          //пилот
floodfill(135+x,190,clred);
line(135+x,182,135+x,192);
line(135+x,192,158+x,194);
end;
var x:integer;
begin
lockdrawing;
for x:=1 to 640 do      //движения 
begin 
clearwindow; 
 samolet(x); 
sleep(10); 
redraw end;end.
4,8(50 оценок)
Ответ:
smail550
smail550
11.01.2020

Тест по теме «Алгоритмы в языке Паскаль»

Вариант 1

1. Алгоритм, в котором команда или серия команд повторяется, называется

А) циклическим;  

2. Укажите процесс, который демонстрирует работу циклического алгоритма:  

A) движение часовой стрелки;

3. Какой цикл называют циклом с предусловием?

B) While;

5. Требуется подсчитать сумму натуральных чисел от 5 до 125. Какое условие нужно использовать в цикле While?

C) i<=125.

6. Сколько раз будет выполняться цикл For i:=7 to 12 do…;

B) 6 раз;

7. Сколько раз исполнится цикл:

i:=4;  

while i<10 do i:=i+3;  

A) 2 раза;

8. Сколько раз исполнится следующий цикл:

i:=21;

Repeat  

i:=i-5

Until i<21;

A) 1

9. Чему будет равна переменная sum после выполнения фрагмента программы:

sum:=0;

for i:=7 to 9 do

sum:=sum+i;

B) 24;.

10 . Чему равна переменная с после выполнения алгоритма:

а:=2

b:=3

а:=а*b=6

b:=a+b=9

c:=3-2*a+b=0

c:=c-b=-9

C) -9

Тест по теме «Алгоритмы в языке Паскаль»

Вариант 2

1.Алгоритм, в котором команда или серия команд повторяется называется

A) циклическим;  

2.Укажите процесс, который демонстрирует работу циклического алгоритма:

C) движение Земли вокруг своей оси.

3.Какой цикл называют циклом с постусловием?

A) Repeat;  

5.Требуется подсчитать сумму натуральных чисел от 2 до 22. Какое условие нужно использовать в цикле While?

A) i<23;  

6.Сколько раз будет выполняться цикл For i:=4 to 8 do…;

A)5 раз;  

7.Сколько раз исполнится цикл:

i:=6;

while i<18 do i:=i+3;

C)4 раза.

8. Сколько раз исполнится следующий цикл:

i:=12;

Repeat

i:=i-2

Until i<4;

B)5;  

9.Чему будет равна переменная sum после выполнения фрагмента программы:

sum:=0;

for i:=5 to 8 do

sum:=sum+i;

C)26.

10. Чему равна переменная с после выполнения алгоритма:

а:=4

b:=1

b:=b-a=-3

b:=b*a=-12

a:=a-2*b=28

c:=a+b=16

B) 16

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