Вexcel нужно построить на промежутке [-2; 2] с шагом 0, 4 таблицу значений функции: y= x в квадрате+0, 2х для х меньше равно 0, sin(0, 1x) для х больше равно 0. построить график полученной функции. заранее

Підготовка тексту листа; прикріплення до листа окремих файлів; відправка повідомлення одному адресату чи групі; перевірка орфографії; отримання, зберігання та впорядкування по папках електронні листи; автоматичне додавання електронного цифрового підпису; інформування користувача про надходження нових листів; пересилання отриманих листів іншим адресатам; цитування тексту отриманого листа; формування та використання адресної книги; шифрування/дешифрування листів; включення запиту на підтвердження факту отримання листа адресатом.

const

  n = 3;

var

  num: real;

  p, k, i, s: integer;

  nstr, kstr: string;  

begin

  readln(num);                                  

  str(num, nstr);  

  p: = pos('.', nstr);  

  kstr: = copy(nstr, p + 1, n);  

  k: = strtoint(kstr);  

  s: = 0;

  while (k < > 0) do

  begin

    s: = s + (k mod 10);

    k: = k div 10;

  end;  

  writeln(s);

end.