Исполнитель "вычислитель" умеет выполнять только две команды: умножить на 2и прибавить 1. придумайте для него наиболее короткий план получения из 1 числа 50.

Прибавить 1 (1 + 1 = 2)
Прибавить 1 (2 + 1 = 3)
Умножить на 2 (3 * 2 = 6)
Умножить на 2 (6 * 2 = 12)
Умножить на 2 (12 * 2 = 24)
Умножить на 2 (24 * 2 = 48)
Прибавить 1 (48 + 1 = 49)
Прибавить 1 (49 + 1 = 50)

1)Еще недавно, говоря о робо­тах, мы имели в виду научную фантастику или сильно отдаленное будущее. Но технологический процесс с невообразимой скоростью меняет окружающий мир, заставляя меняться нас и наши подходы к образованию детей. Робото­техника на сегодняшний день является самым перспектив­ным из инновационных нап­равлений.

Ведущие эксперты прогнозируют бум сервисной и персональной робототехники уже к 2025 году, а это означает, что потребуются десятки ты­сяч специалистов новой формации. Самой востребованной специальностью после 2025 года будут программисты-робототехники. И начинать ос­ваивать новые профессии нужно уже сейчас, чтобы се­годняшние школьники могли уверенно войти в жизнь.

2)Ро́бот — автоматическое устройство, предназначенное для осуществления различного рода механических операций, которое действует по заранее заложенной программе.

3)По прогнозам консалтинговой компании A.T. Kearney уже через 20 лет некоторые рабочие места, на которых работают люди, займут роботы. DW выяснила, в каких отраслях искусственный интеллект будет конкурировать с человеком.

Объяснение:

1)program primer1;

var х,у,z:integer;

{ описание переменных }

begin { начало программы }

х := 3; { установка значения х }

у := 5; { установка значения у }

z := х + у; { вычисление суммы }

write(z); {вывод результата вычисления на экран }

end. { конец программы }

2) program vetvlenija;

uses crt;

var A:real;

begin

clrscr;

write ('Введите число A: ');

readln (A);

if A>=0 then

writeln ('Вы ввели положительное число');

readln

end.

3) program cikle;

var

i, n: integer;

begin

write ('Количество знаков: ');

readln (n);

 for i := 1 to n do

write ('(*) ');

 

readln

end.

Объяснение:

1) линейный, без ничего

2) ветвление - if then

3) цикл - for