Составить программу вычисления значений функции f(x) на отрезке [а; b] с шагом h. результат представить в виде таблицы, первый столбец которой — значения аргумента, вто¬рой — соответствующие значения функции: f(x)=xcos(1\x)+2 решить нужно в паскаль.

uses crt; var a,b,h: real; function f(x: real): real; begin f: =x*cos(1/x)+2; end; begin write('a: '); read(a); write('b: '); read(b); write('h: '); read(h); writeln('полученный результат: '); writeln(' x | f(x) '); while a< b do begin writeln(a: 5: 4,'|',f(a): 5: 4); a: =a+h; end; end.

#include< iostream> using namespace std; int main() {    int a;     cin > > a;   if (a < 1 || a > 2200)    {        cout < < "error";         return 0;     }        if (a % 400 == 0 || (a % 4 == 0 & & a % 100 ! = 0))    {        cout < < "leap";         return 0;     }    else    {        cout < < "normal";         return 0;     } }

Var   k: integer; begin   write('задайте число цветов: ');   readln(k);   if k=0 then writeln('я не посадил ни одного цветка')   else   begin       if k> 0 then write('я посадил ',k,' цвет')       else       begin           k: =-k;           write('я выполол ',k,' цвет')       end;       case k mod 100 of       11..19: write('ов');       else           case k mod 10 of           1: write('ок');           2..4: write('ка');           else write('ов');           end       end   end end.