Создать проект на winform, где вводится расстояние, цена бензина, потребление бензина и вычисляется стоимость поездки на дачу. Также ставится галочка для расчета стоимости в одно направление или туда и обратно

Приложение создано на основе шаблона C++/CLR Windows Forms für Visual Studio 2017

Предусмотрен ввод дробных чисел, вывод суммы проводится с не более чем 2 знаками после запятой. Также присутствует простейший контроль ввода данных: обработаны случаи неполного ввода данных и некорректного ввода данных. В обоих случаях вызывается MessageBox с сообщением об ошибке.

.txt файл, прикрепленный к ответу - .rar архив со смененным расширением. Для получения файлов необходимо снова сменить расширение файла на .rar и открыть любым архиватором. Файл trip.exe находится в trip.rar\trip\Debug\

C#

Как и в другом ответе, txt файл - архив 7z со сменённым расширением. После скачивания необходимо вернуть обратно: file.txt переименовать в file.7z.

Из мелочей:

Дробные числа (как с запятой, так и с точкой).Более простая проверка на корректность ввода данных.Есть иконка, gui получше.

Цикл с предусловием это такой цикл, в котором условие проверяется перед выполнением тела цикла.
А цикл с постусловием - на оборот, он сначала выполнит, а потом проверит условие и если условие true, то цикл завершится.

Цикл с постусловием, можно использовать в таких ситуациях, когда надо что-то сделать и если чего-то не хватает, то сделать еще раз. Напрмер отправить письмо на email, а если не отправилось, то повторить еще 3 раза. Сначала выполнится тело цикла, в котором находятся функции отправки письма и если отправка удачная, то сообщаем until() true. Иначе тело выполнится еще и еще и еще кучу раз, если мы не задали счетчик в теле цикла, как вариант...

Цикл с предусловием можно использовать, если надо проверять какое-то значение ПЕРЕД выполнением тела цикла и тебе не важно, должно ли оно хоть раз выполниться. Например запросить пароль у пользователя. Но если пользователь уже ввёл пароль, то зачем его запрашивать? Тут можно было бы использовать while

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  var a:=MatrixRandom(7,7,0,9);
  var k:=0;
  for var i:=0 to 6 do begin
    for var j:=0 to 6 do begin
      Write(a[i,j]:3);
      if a[i,j] in [1..5] then Inc(k)
      end;
    Writeln
    end;
  Writeln('Кол-во элементов на [1,5]: ',k)
end.

Тестовое решение:
  2  1  7  3  3  2  7
  9  2  9  2  0  5  5
  4  2  6  9  4  6  0
  1  0  3  5  4  5  9
  6  3  6  0  2  0  8
  0  8  4  3  2  1  8
  6  0  4  4  5  4  0
Кол-во элементов на [1,5]: 27

Вариант "совсем для школы"

const
  n=7;
var
  a:array[1..n,1..n] of integer;
  i,j,k:integer;
begin
  Randomize;
  k:=0;
  for i:=1 to n do begin
    for j:=1 to n do begin
      a[i,j]:=Random(10);
      Write(a[i,j]:3);
      if a[i,j] in [1..5] then Inc(k)
      end;
    Writeln
    end;
  Writeln('Кол-во элементов на [1,5]: ',k)
end.