Путешествуя на автомобиле, вы заехали на заправку. До следующей заправки 200 километров. Напишите программу, которая будет определять, нужно ли вам заправляться или можно подождать до следующей станции.

Программа должна спрашивать:

• Какой размер вашего бензобака в литрах?
• Сколько горючего в бензобаке (в процентах)?
• Сколько километров проходит автомобиль на одном литре?

Результат работы программы должен выглядеть примерно так:
Размер бензобака: 60. Размер бензобака: 60

Заполненная в процентах: 40 заполнена в процентах: 30
Км на 1 литре: 10 Км на 1 литре: 10
"Вы можете проехать еще 240 км, Вы можете проехать еще 144 км
Следующая заправочная через 200 км. Следующая заправка через 200 км.

Можно подождать следующей заправки заправьтесь СЕЙЧАС

Дополнительное задание: Добавьте к программе погрешность в 5 литров на случай не совсем точных показаний расхода топлива.

1. Откройте Scratch

2. На странице операторов перейдите на вкладку «Контроль»

3. Перетащите, удерживая левую кнопку мыши, оператор «Когда клавиша … нажата» в нашу программу (вкладка СКРИПТЫ)

4. В выбранной команде измените клавишу «пробел» на «стрелку влево»

5. Обдумаем, что кот должен делать. Во-первых, двигающийся влево кот дол жен смотреть в направлении, в котором шагает, поэтому начнем с того, что повернем кота налево. Для этого:

• на странице операторов перейдите на вкладку «Движение»;

• выберите и перетащите в программу оператор «Повернуть в направление 90 градусов»;

• измените параметр «90» на «-90».

6. На странице операторов «Движение» выберите оператор «Идти 10 шагов» и добавьте в программу

А теперь нажмите на клавиатуре клавишу управления курсором "стрелка влево". Что получилось? Ты научил ходить кота влево по твоей команде!

Наш первый скрипт уже готов! Более того, он даже работает! Пусть вас не пугает, что он идет вниз головой, немного позднее мы легко исправим эту "странность".

7. Щелкните правой кнопкой мыши на первом операторе и выберите команду Дублировать.

Догадайся, для чего нужен этот приём.

8. Аналогично предыдущим действиям научите кота двигаться «направо», «вверх» и «вниз».

9. Если сильно увлечься, то кот может выйти за границы поля. Предусмотрите этот момент в программе: используйте команду "если край оттолкнуться".

10. Хочешь, чтобы кот поздоровался с тобой? Научи его говорить!

Перейдите на странице операторов на вкладку «Контроль».

11. Перетащите команду "когда щелкнут по " в программу.

12. С вкладки «Движение» перетащите в программу команду: «идти в х:0 у:0».

13. С вкладки «Внешность» перетащите в программу команду «Говорить Привет! В течение 2 с»

14. Поиграй с котом, используя клавиши управления курсором, понажимай зеленый флажок.

// PascalABC.NET 3.0, сборка 1073
const
  nn=30;
  mm=30;
var
  a:array[1..mm,1..nn] of integer;
  m,n,i,j,imax,imin,jmax,jmin:integer;
begin
  Writeln('Введите число строк и столбцов массива: '); Read(m,n);
  Randomize;
  Writeln('*** Исходный массив ***');
  imin:=1; jmin:=1; imax:=1; jmax:=1;
  for i:=1 to m do begin
    for j:=1 to n do begin
      a[i,j]:=Random(51)-25;
      Write(a[i,j]:4);
      if a[i,j] mod 2 = 0 then begin
        if a[i,j]<a[imin,jmin] then
          begin imin:=i; jmin:=j end
        else
          if a[i,j]>a[imax,jmax] then
            begin imax:=i; jmax:=j end
      end
    end;
    Writeln
  end;
  Writeln('*** Результирующий массив ***');
  for i:=1 to m do begin
    for j:=1 to n do begin
      if (i=imin) and (j=jmin) or (i=imax) and (j=jmax) then a[i,j]:=2*a[i,j]
      else a[i,j]:=3*a[i,j];
      Write(a[i,j]:4)
    end;
    Writeln
  end
end.

Тестовое решение:
Введите число строк и столбцов массива:
10 8
*** Исходный массив ***
 -18   9  23 -18  -3  12   4 -22
  16 -24   7  -1  11   5  21 -25
  20 -11  14 -13  13 -21  13  -2
 -20   2  10 -19  -4   5  -7 -21
  16  17 -11   1   2 -18  21   0
  -2 -10  -6   3  25  16   5  -9
 -12   9   7 -21  22  -1 -25 -23
  22   0 -24  21 -23  -3   7 -15
   8   3   8  20 -10  -5  -2  13
  -6 -12  15  -3  11 -16  -1 -10
*** Результирующий массив ***
 -54  27  69 -54  -9  36  12 -66
  48 -48  21  -3  33  15  63 -75
  60 -33  42 -39  39 -63  39  -6
 -60   6  30 -57 -12  15 -21 -63
  48  51 -33   3   6 -54  63   0
  -6 -30 -18   9  75  48  15 -27
 -36  27  21 -63  44  -3 -75 -69
  66   0 -72  63 -69  -9  21 -45
  24   9  24  60 -30 -15  -6  39
 -18 -36  45  -9  33 -48  -3 -30