Есть ответ 👍



1.Запишите оператор присваивания переменной х значения из диапазона 15 – 105
2.Составьте условный оператор для задачи: если переменная х равна 1, то увеличьте её значение на 3, иначе увеличьте значение переменной х в 2 раза
3.Запишите условный оператор для определения наибольшего из переменных к, m.

212
451
Посмотреть ответы 2

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


Код ниже

Объяснение:

1. x := Random(91) + 15;

2. if x = 1 then

       x := x + 3

      else x := x*2

3. if k >= m then

      max := k

   else max := m


Var   a: array [1..10] of integer;   i, p  : integer; begin   for i : = 1 to 10 do   begin     write('a[', i, '] =  ');     readln(a[i]);   end;   for i : = 1 to 10 do     if a[i] mod 2 = 0 then  p : = p * a[i];   writeln(p); end.

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