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

dashutadashuta2007 dashutadashuta2007    3   26.07.2019 11:40    0

Ответы
zagudaevaa zagudaevaa  03.10.2020 13:29
//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.
ПОКАЗАТЬ ОТВЕТЫ
WinnerGDWot027 WinnerGDWot027  03.10.2020 13:29
Var
  i: integer;

begin
  for i := 1 to 10 do
    writeln('x=', i:2, ' y=', (56 * sqr(i) - 32):4);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика