Найти значение функции У=Х2+1 для Х=2,3,4,5;...14,15.
Var x:integer;
begin;
for x:=2 to 15 do
writeln(y=,x*2+1, for x=,x);
end.
var x:integer;
begin;
for x:=2 to 15 do
writeln(y=,sqr(x)+1, for x=,x);
end.
Оцени ответ
