Создать процедуру для вывода таблицы значений функции

@Ticey · Регистрация: 16.05.2017

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

20. Создать процедуру для вывода таблицы значений функции y=sin (x + 1)^2 для х от a до b с шагом h. Вывести две таблицы: а) для х от 2 до 3 с шагом 0.1 и б) для х от -2 до 3 с шагом 0.5

@Hitoku · 16.05.2017, 22:51

Pascal

procedure fun(a, b, h: real);
begin
  writelnformat('От {0} до {1} с шагом {2}', a, b, h);
  Range(a, b, integer.Parse(((b - a) / h).ToString))
    .Select(v -> Format('{0} = {1}', v, sqr(sin(v + 1)))).Print(NewLine);
end;
 
begin
  fun(2, 3, 0.1);
  writeln; writeln;
  fun(-2, 3, 0.5);
end.

@Ticey 0 / 0 / 0 Регистрация: 16.05.2017 Сообщений: 9
		1
	Создать процедуру для вывода таблицы значений функции 16.05.2017, 22:28. Показов 1675. Ответов 1 Метки нет (Все метки) 20. Создать процедуру для вывода таблицы значений функции y=sin (x + 1)^2 для х от a до b с шагом h. Вывести две таблицы: а) для х от 2 до 3 с шагом 0.1 и б) для х от -2 до 3 с шагом 0.5 0

	16.05.2017, 22:51

Создать процедуру для вывода таблицы значений функции

Решение