Напишите программу вычисления значения функции y= √(x-2)/((x-3)(x-5)) для любого x, введенного с клавиатуры

298

433

Посмотреть ответы 1

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

pandapurple

Информатика

4,8(60 оценок)

Programm p1; var i,s: integer; arr1: array [1..8] of integer; begin for i: =1 to 8 do begin writeln ('введите элемент массива ',i); readln(arr1[i]); end; s: =0; for i: =1 to 8 do begin if (arr1[i] mod 2 < > 0) and (arr1[i]> 0) then s: =s+arr1[i]; end; writeln('сумма нечетных положительных элементов равно: ',s); end.