Протабулировать функцию

@ЮляСергеева · Регистрация: 08.11.2017

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

составьте блок-схемы алгоритмов решения задач и программы на языке pascal с использованием цикла с предусловием, используя условный оператор if

$https://www.cyberforum.ru/cgi-bin/latex.cgi? Y=x^2+12x-\sqrt{x^{\,}} $

$https://www.cyberforum.ru/cgi-bin/latex.cgi? x=\begin{cases}t^2+2t & ;\ t\leq 2 \\\\\\\\ t & ;\ 2\,<\,t\,<\,5 \\\\ \ln t+\frac{1}{t} & ;\ t\geq 5 \end{cases} $

$https://www.cyberforum.ru/cgi-bin/latex.cgi? t=Z+\ln Z $

$https://www.cyberforum.ru/cgi-bin/latex.cgi? Z\in [1;\,10];\ \ \Delta Z=1 $

@Cyborg Drone · 11.12.2017, 22:53

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
26
27
28
29
const
  z0 = 1;
  zn = 10;
  dz = 1;
  hor = '+----+----------+----------+-----------+';
 
var
  z, t, x, y: real;
 
begin
  z := z0;
  writeln(hor);
  writeln('|  Z |     t    |     x    |     Y     |');
  writeln(hor);
  while z <= zn do
    begin
      t := z + ln(z);
      if t <= 2
        then x := t * (t + 2)
        else if t < 5
          then x := t
          else x := t + 1 / t;
      y := x * (x + 12) - sqrt(x);
      writeln('| ', z :2:0, ' | ', t :8:5, ' | ', x :8:5, ' | ', y :9:5, ' |');
      z := z + dz
    end;
  write(hor);
  readln
end.

Новые блоги и статьи Все статьи Все блоги /
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/

@ЮляСергеева 0 / 0 / 0 Регистрация: 08.11.2017 Сообщений: 14

	Протабулировать функцию 11.12.2017, 21:49. Показов 1001. Ответов 1 Метки нет (Все метки) составьте блок-схемы алгоритмов решения задач и программы на языке pascal с использованием цикла с предусловием, используя условный оператор if $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> Y=x^2+12x-\sqrt{x^{\,}}<br />$ $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> x=\begin{cases}t^2+2t & ;\ t\leq 2 \\\\\\\\ t & ;\ 2\,<\,t\,<\,5 \\\\ \ln t+\frac{1}{t} & ;\ t\geq 5 \end{cases}<br />$ $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> t=Z+\ln Z<br />$ $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> Z\in [1;\,10];\ \ \Delta Z=1<br />$ 0

Протабулировать функцию

Решение