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

Робот оснащён двумя отдельно управляемыми колёсами, радиус каждого из колёс робота равен 5 см. Левым колесом управляет мотор А, правым колесом
управляет мотор В. Колёса напрямую подсоединены к моторам (см. схему
робота).
направление
вперед
А B
Схема робота
Робот проехал участок прямолинейной трассы. При этом оси моторов робота
повернулись на 2880°.
Расстояние между центрами колёс робота равно 20 см. Масса робота равна
2 кг. При расчётах примите пx 3.
Определите, какой длины был прямолинейный участок трассы. ответ дайте в
сантиметрах. В ответ запишите только число.

Показать ответ
Ответ:
artem880
artem880
03.08.2021 19:09

9.Определите значение переменной a после выполнения фрагмента программы:

a:=10;

b:=3;

if a > b then b:=b+12//а больше б, значит к б прибавим 12 и получим что б 21

else a:=a-7;//а это игнорим

if a > b then a:=a+12//теперь а не больше б(б21 а а 10), так что к а прибавим 12, получаем а 22

else a:=a-7;// а это игнорим

А = 22.

11.Определите что будет напечатано в результате работы следующей программы.

Var k,i: integer;

Begin

k :=4;/к равно 4

For i := 1 to 3 do//следующая строка повториться 3 раза, а и при этом будет меняться от 1 до 3

k := 2*k +i;

// При и равном 1 к станет 9

// При и равном 2 к станет 20

// При и равном 3 к станет 43

Writeln(k);// выведет 43

end.

ответ 43

12.Определите что будет напечатано в результате работы следующей программы.

Var s,i: integer;

Begin

s :=3;

For i := 2 to 5 do// и будет меняться от 2 до 5

s := s+2*i

//К с будет прибавляется 2i т.е. сперва 3;7;13;21;31

Writeln(s) ;//31

end

ответ:31

13.Определите что будет напечатано в результате работы следующей программы.

Var s,n: integer;

Begin

s :=1;

For n := 3 to 8 do//повториться 6 раз

s := s*2// каждый раз s увеличивается вдвое, т.е.это 2 в 6 степени

write(s) ;

end.

ответ:64

14.Чему будет равно значение переменной а после выполнения этого цикла?

i:=4;

a:=12;

while i<6 do begin//по сути он повторится 2 раза, а и будет принимать значение от 4 до 5

a:=a+i;//а увеличиваем на и: сперва это 16, потом 21

i:=i+1

end.

ответ:21

0,0(0 оценок)
Ответ:
Анастасия22Кот11
Анастасия22Кот11
23.12.2021 03:38

var n:integer;
x1,x2,x3,x4,x5,x6,x7,x8,x9,x10:integer;
begin
read(n);
x1:=n div 1000000000;
x2:=n mod 1000000000 div 100000000;
x3:=n mod 100000000 div 10000000;
x4:=n mod 10000000 div 1000000;
x5:=n mod 1000000 div 100000;
x6:=n mod 100000 div 10000;
x7:=n mod 10000 div 1000;
x8:=n mod 1000 div 100;
x9:=n mod 100 div 10;
x10:=n mod 10 div 1;
writeln('1 = ',x1);
writeln('2 = ',x2);
writeln('3 = ',x3);
writeln('4 = ',x4);
writeln('5 = ',x5);
writeln('6 = ',x6);
writeln('7 = ',x7);
writeln('8 = ',x8);
writeln('9 = ',x9);
writeln('10 = ',x10);
end.

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