:составить программу вычисления значения функции х=12а2+7а-16 при любом значении

uses crt; var  i,s: integer; begin  i: =2; s: =1;   while i< =10 do  begin    s: =s*i;     i: =i+2;   end;   write(s); end.

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются