Написать программу на Pascal: Найти значение выражения x^2-7x+6 для x от 1 до 7.
Написать программу на Pascal:
Найти значение выражения x^2-7x+6 для x от 1 до 7.
Гость
Ответ(ы) на вопрос:
Гостьvar x,y:integer;beginreadln(x);if (x>1) and (x<7) theny:=sqr(x)-7*x +6;writeln('Значение выражения: ',y);end.
Гостьvar x:integer;beginfor x:=1 to 7 do writeln(x*x-7*x+6);end.
Не нашли ответ?
Похожие вопросы