Разработать пользовательскую функцию игрек равно f от x для вычисления значения функции и построить график Excel функции значение коэффициентов a,b,c,d и приращение аргумента задать самостоятельно ​

program vt;

 

type toy = record     // тип игрушка

      name : string;   // название

      price : integer;     // стоимость

      age : integer;         // возрастные границы

      a: boolean;

end;

 

var

    f : text; // переменая для работы с файлом

    i : integer; // счетчик

    size : integer;   // кол. игрушек

    maxage : integer; // макс. возрастная граница

    maxprice : integer;     // макс цена игрушки

    mas : array [1..100] of toy;   // контейнер игрушек

   

begin

      assign(f, 'input.txt');   // связываем переменную с файлом

      reset(f);               // открываем файл на чтение

      i : = 1;                 // 1 игрушка

      maxprice : = 400;         // макс цена = 400

      maxage: =5;                 //макс. возрастная граница = 5

      while (not eof(f)) do   // пока не дошли до конца файла

      begin

          readln(f, mas[i].name);     // считываем данные об игрушке

          readln(f, mas[i].price);

          readln(f, mas[i].age);

          maxage > mas[i].age;   //найти все до 5 лет

          writeln

         

      end;

end.

//Вот программа, которая кодирует слова в системах счисления от 2 до 10
//Первый ввод - число, второй - система счисления
//Pascal ABC.NET v3.0

var
 a,i,b,r,n,j,bug:integer;
 s,se,slo,slof:string;

procedure preob(var a,b,n:integer; var se:string);
 begin
  repeat
   b:=a mod n;
   a:=a div n;
   str(b,se);
   s+=se;
  until (a<=n-1);
 end;

begin
readln(slo);
readln(n);
for j:=1 to length(slo) do
begin;
a:=ord(slo[j]);
preob(a,b,n,se);
str(a,se);
s+=se;
for i:=1 to length(s) div 2 do
begin;
se:=s[i];
s[i]:=s[length(s)-i+1];
s[length(s)-i+1]:=se[1];
end;
write(s,'-');
slof:=slof+s;
delete(s,1,length(s));
end;
end.

//Слово Программа она кодирует как 11001111-11110000-11101110-11100011-11110000-11100000-11101100-11101100-11100000-