Складіть таблицю розрахунку закупки полуниці з відповідними умовами (умова задачі прикріплена нижче)

Виконане завдання пришліть (файл Exel), а не скриншот

1. Файл – это:
г) Программа или данные на диске, имеющие имя
2. Выбери правильное имя файла:
в) 9 класс А.doc
3. Расширение в имени файла указывает на:
б) тип файла
4. Укажи полное имя файла:
а) A:\Windows\System\pole.exe   
5. Укажи расширение файла:
е) exe
6. C:\Ivanov\Petrov\PROGS\prog1.pas. Какая папка является дочерней для папки Ivanov?
б) Petrov
7. Файловая система – это:
а) совокупность всех файлов на диске    
8. Текущий диск – это диск:
а) диск, с которым пользователь работает в данный момент времени
9. С какой файловой системой работает операционная система на компьютерах в вашем классе:
?
а) простой,
б) многоуровневой,
в) сложной

10. Какие из расширений в списке используются для файлов, содержащих графические изображения:
б) jpeg;
д) bmp.

// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строку:').ToLower;
  var c:=ReadlnChar('Введите искомую букву:').ToLower;
  Writeln('Буква встречается ',s.Where(a->a=c).Count,' раз(а)')
end.

Пример
Введите строку: А роза упала на лапу Азора
Введите искомую букву: а
Буква встречается 8 раз(а)

// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите фразу:');
  s.Replace('Ты','Я').Replace('ты','я').Println
end.

Пример
Введите фразу: Тыков ест тыблоко
Яков ест яблоко

// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строку:');
  var s1:=ReadlnString('Что найти?');
  var s2:=ReadlnString('Чем заменить?');
  s:=s.Replace(s1,s2);
  s.Println;
end.

Пример
Введите строку: мама, мама, что я буду делать, мама, мама, как я буду жить?
Что найти? мама
Чем заменить? папа
папа, папа, что я буду делать, папа, папа, как я буду жить?