Написать программу на Pascal:

Найти значение выражения x^2-7x+6 для x от 1 до 7.

Question

Трофима

22 апреля, 07:14

+1

Ответы (2)

Знаете ответ?

Томила · Answer 1

Var x, y:integer; beginreadln (x) ; if (x>1) and (x<7) theny:=sqr (x) - 7*x + 6; writeln ('Значение выражения: ', y) ; end.

Камилла · Answer 2

Var x:integer; beginfor x:=1 to 7 do writeln (x*x-7*x+6) ; end.

Написать программу на Pascal:Найти значение выражения x^2-7x+6 для x от 1 до 7.