Предмет: Информатика, автор: ustinovleshka2Fearl

Найдите значение функции у=56х2-32 на отрезке (1;10) с шагом 1.

Ответы

Автор ответа: Gleb1Kosyrev
0
//Pascal ABC.NET v3.1 сборка 1172

Var
 y:real;
 i:integer;
begin
 for i:=1 to 10 do
  begin
   y:=56*sqr(i)-32;
   writeln('x=',i,' y=',y);
  end;
end.
Автор ответа: ustinovleshka2Fearl
0
Спасибо,можешь еще помочь?
Автор ответа: ustinovleshka2Fearl
0
Найдите сумму всех натуральных чисел от -15 до 15
Автор ответа: archery
0
var
  i: integer;

begin
  for i := 1 to 10 do
    writeln('x=', i:2, ' y=', (56 * sqr(i) - 32):4);
end.
Похожие вопросы
Предмет: Русский язык, автор: aleksandramonakhova8