Регистрация
янивановсергеевич
22.11.2021 02:36
Информатика
Есть ответ 👍

У исполнителя Альфа две команды:

1) Прибавь 2

2) Умножить на b

Выполняя первую из них, Альфа увеличивает число на экране на 2, а выполняя другую, умножает это число на b. Программа для исполнителя Альфа - это последовательность номеров команд. Известно, чтот программа 22111 переводит число 5 в число 86. Определите число b.

152
490
Посмотреть ответы 1

Ответы на вопрос:

afsanka98
afsanka98
4,5(84 оценок)
Var a: array[1..10] of integer;   i,k,min: integer;   begin  k: =0;   for i: =1 to 10 do begin  read(a[i]);   if (a[i] mod 2=0) and (a[i]< 0) then  k: =k+1;   if a[i]> 0 then min: =a[i];   end;   for i: =1 to 10 do  if (a[i]< min) and (a[i]> 0) then min: =a[i];   writeln('количество четных отрицательных чисел ', k);   if min=0 then writeln('положительных элементов нету') else  writeln('минимальный положительный элемент массива ', min);   end. 

Популярно: Информатика