(Нужна блок-схема)Складіть програму обчислення вартості деякої кількості яблук. Екран повинен мати вигляд: Введіть вхідні дані: Вартість 1 кг яблук (грн.) –> 8.5 Вага яблук (кг) –> 2.3 Вартість покупки: 19.55 грн

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  WriteAllText('MyFile.txt',SeqRandom(n,-99,99).JoinIntoString);
  var (mn,mx):=(MaxInt,-MaxInt);
  foreach var line in ReadLines('MyFile.txt') do begin
    var a:=line.ToIntegers;
    (mn,mx):=(Min(a.Min,mn),Max(a.Max,mx))
    end;
  Writeln('Cумма min+max = ',mn,'+',mx,' = ',mn+mx);
  ReadAllText('MyFile.txt').Println // контрольный вывод файла
end.

Пример
n= 20
Cумма min+max = -99+71 = -28
62 -72 39 -93 -99 -46 -77 71 -12 13 -89 18 -17 19 -35 -62 30 17 -74 37

1. переговоры в интернете не требуют встречи лицом к лицу, поэтому это экономит на переезд в другой город(страну)
2.дистанционное обучение- самообучение не находясь в школе Минусы- большую часть программы ребенок может не понять ребенок
Плюсы- ребенок сможет пройти всю программу обучения не тратя деньги  и энергию на поход в школу пешком или на автобусе
Очное- ребенок учиться лицом к лицу с учителями и своими сверсниками
минусы- трата время и денег на путь в школу
плюсы- с объяснением учителей ребенок понимает большуу часть школьной программы