Процедура или функция: табулирование функции

@SerejaArmatura · Регистрация: 24.09.2012

Студворк — интернет-сервис помощи студентам

1. y = e^ ( 0.2x^2) ; интервал : [-1,1], step = 0.1.
нужно сделать табулирование функции и вывести ее на экран, а так же при помощи цыклов while, repeat вычеслить сумму значений функции. результат вывести отдельно!+ надо сделать либо функцию либо процедуру!!! вот на этом я сижу и не могу понять как процедуру или функцию сделать...

@domovou2.0 · 27.09.2012, 23:38

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var x:real;
procedure fun(var x:real);
var
y:real;
begin
x:=-1;
while x<=1 do begin
           y:=exp(sqr(0.2*x));
           x:=x+0.1;
           end;
writeln('y=e^(0.2x^2) на интервале [-1;1]');
writeln(y);
end;
begin
fun(x);
end.

@ermolay · 28.09.2012, 01:08

domovou2.0, Вы проверяли свою программу?

SerejaArmatura, вариант с вводом исходных данных:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
procedure tab(x,xn,d:real);
var i: integer;
  y,s: real;
begin
  s:=0;
  while x<xn do
  begin
    y:=exp(0.2*x*x);
    writeln('При х = ',x:0:2,'   у = ',y:0:3);
    x:=x+d;
    s:=s+y;
  end;
  writeln('Сумма значений функции равна = ',s:0:3);
end;
  
var
  x,xn,y,s,d: real;
begin
  write('Введите границы интервала: ');
  readln(x,xn);
  write('Введите шаг: ');
  readln(d);
  tab(x,xn,d);
  readln;
end.

@domovou2.0 · 28.09.2012, 13:45

Сообщение от ermolay

domovou2.0, Вы проверяли свою программу?

Да))
Я забыл "y" суммировать)))
Извиняюсь.

@ermolay · 28.09.2012, 13:51

Сообщение от domovou2.0

Да))
Я забыл "y" суммировать)))

Еще забыли вывод зациклить и формула немножко неверная.. Будьте внимательней!

Новые блоги и статьи Все статьи Все блоги /
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .

@SerejaArmatura 0 / 0 / 0 Регистрация: 24.09.2012 Сообщений: 39

	Процедура или функция: табулирование функции 27.09.2012, 23:08. Показов 1585. Ответов 4 Метки нет (Все метки) 1. y = e^ ( 0.2x^2) ; интервал : [-1,1], step = 0.1. нужно сделать табулирование функции и вывести ее на экран, а так же при помощи цыклов while, repeat вычеслить сумму значений функции. результат вывести отдельно!+ надо сделать либо функцию либо процедуру!!! вот на этом я сижу и не могу понять как процедуру или функцию сделать... 0