Ав 1 6 3 2 а1+в1 а1/в1 1. какие значения будут в ячейках а2 и в2? 2. какие значения будут в ячейках а2 и в2, если ввести в а1 число 2, в в1 число4? 3. какое значение нужно занести в в1, чтобы в в2 появилось сообщение об ошибке?

использовать Чертежник

алг

нач

сместиться в точку (0,5)

опустить перо

сместиться в точку (-0.1,5.1)

сместиться в точку (-0.2,5)

сместиться в точку (-0.1,4.9)

сместиться в точку (0,5)

поднять перо

сместиться в точку (0,0)

опустить перо

сместиться в точку (0,3)

сместиться в точку (-2,4)

сместиться в точку (-3,5)

сместиться в точку (-3,8)

сместиться в точку (-2,8)

сместиться в точку (-2,5)

сместиться в точку (-1,5)

сместиться в точку (0,7)

сместиться в точку (1,7)

сместиться в точку (2,6)

сместиться в точку (2,4)

сместиться в точку (1,3)

сместиться в точку (2,4)

сместиться в точку (2,6)

сместиться в точку (5,6)

сместиться в точку (6,5)

сместиться в точку (6,3)

сместиться в точку (5,2)

сместиться в точку (5,0)

сместиться в точку (3,0)

сместиться в точку (3,2)

сместиться в точку (2,2)

сместиться в точку (2,0)

сместиться в точку (0,0)

поднять перо

кон

Объяснение:

Смотри картинку

const n = 7;

var a: array [1..n] of integer;

i, max: integer;

begin

   for i := 1 to n do

   begin

       write('Введите ', i, ' элемент: ');

       readln(a[i]);

   end;

   max := 0;

   for i := 1 to n do

   begin

       if (a[i] mod 10 = 3) and (a[i] > max) then

           max := a[i];

   end;

   for i := 1 to n do

   begin

       if (a[i] mod 8 = 0) then

           a[i] := a[i] + max;

   end;

   for i := 1 to n do

   begin

       write(a[i], ' ');

   end;

   writeln();

end.