Сколько существует различных натуральных значений d таких, что в результате выполнения следующей программы будет напечатано число 243? код на языке pascal var n, s, d: integer; begin readln(d); n : = 3; s : = 5; while s < 2019 do begin s : = s + d; n : = n + 10; end; write(n) end. код на языке python d = int( n = 3 s = 5 while s < 2019: s += d n += 10 print(n)

Program a22; const       max = 42; var       vt: array[1..max]of byte;       i,n: byte;       x: integer; begin   n : = max;   writeln('массив из n элементов будет задан случайными числами на интервале [0,3].');   readln(n);     write('введите число которое будет добавлено к каждому элементу.');   readln(x);     writeln('начальный массив' );   randomize;   for i: =1 to n do begin       vt[i]: =random(1,3);       write(vt[i], ' ');   end;   writeln(' ');     writeln('массив c результатом' );   for i: =1 to n do begin       write(vt[i]+x, ' ');   end;   writeln(' ');   end.

Текст:   напечатать в виде таблицы значения функции y=7x^3+2/3x+корень x-4 , для значений x изменяющегося от 5 до b с шагом 5.итак, начнём. пень знает что это за сомнительное б, ну да ладно. я думаю - это число произвольное. var  x,b: integer; beginx: =5; b: =300; writeln('|      x      |        y(x)      |'); while x< =b dobegin  writeln('||'); writeln('|  ',x,'      |','  ', (7*(x*x*x)+2)/(3*x+sqrt(x- '    |'); x: =x+5; end; writeln('||'); end.это первая . третья . я не знал, что там за икс, и откуда он берётся, так что сделал так что пользователь вводит икс самостоятельно.a=ln(x^3-2|*1/tgx) var a,x: real; begin writeln('введите число x'); readln(x); if x< =2 then writeln('значение x не подходит, значениe "а" присваивается ноль.') else a: =(sqrt(sqr(ln(x*x*x-*(1/(sin(x)/cos(; writeln('a=',a); end.