Найти значения функции у= 5х+х2, при х=50, 49, 48, 47, …, 40. ПАСКАЛЬ.
Найти значения функции у= 5х+х2, при х=50, 49, 48, 47, …, 40. ПАСКАЛЬ.
Гость
Ответ(ы) на вопрос:
Гость Var s,i :integer;
begin
for i:=50 downto 40 do
begin
s:=(5*i)+(i*2);
writeln(s);
end;
end.
Не нашли ответ?
Похожие вопросы