Есть ответ 👍

1) напишите программу, вычисляющую значение функцию y=n(x+3x)^4-12xn+2n, для х и n введённых с клавиатуры. вычисление значения функции вынесите в отдельную процедуру. 2) напишите программу вычисляющую количество пар чисел, сумма которых четна 6 пар чисел вводится с клавиатуры. (способ ввода выберите сами) ! )

162
407
Посмотреть ответы 2

Ответы на вопрос:

LeraJorge
4,7(45 оценок)

// pascalabc.net 3.3, сборка 1599 от 17.12.2017 // внимание! если программа не работает, обновите версию! procedure dimdimoch(x: real; n: integer; var r: real); begin   r: =n*sqr(sqr((x+3**x*n+2*n end; begin   var x: real;   var n: integer;   write('введите x и n: '); read(x,n);   var r: real;   dimdimoch(x,n,r);   writeln('значение функции ',r) end. пример введите x и n: -1.23 4 значение функции 2410.83920384 begin   writeln('введите 6 пар целых чисел');   var k: =0;   loop 6 do begin       var (a,b): =readinteger2;       if (a+b).iseven then k+=1       end;   writeln('число пар с четной суммой: ',k) end. пример введите 6 пар целых чисел 15 23 19 -7 5 0 4 11 132 63 444 12 число пар с четной суммой: 3

1) 10000110 2) 11001010 3) 11010001

Популярно: Информатика