Табулирование функций в Pascale

@Kepblood · Регистрация: 21.01.2019

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

Необходимо протабулировать функции, зависящие от двух переменных или от нескольких параметров. Результаты табулирования оформить в виде одной таблицы или совокупности таблиц. Параметры таблицы (число колонок, их ширину) вводить с экрана. Для введенной информации о таблицах организовать минимальную проверку на достоверность: таблица должна располагаться на видимой части экрана, ширина колонок должна быть достаточной для размещения числовых данных. Организовать простейший диалог по вводу корректных данных.

Вычислить значение функции:
U(x,y):=(y>= -2) and (abs(x)<=1) and ((x>=0) and (y<=x) or (x<0) and (y<-x))
при x, изменяющемся от -1.5 до 1.5 с шагом 0.5, и y, изменяющемся от -1 до 1 с шагом 0.25 .

@Puporev · 22.01.2019, 09:26

Решение собственно задачи такое

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
function U(x,y:real):boolean;
begin
U:=(y>= -2) and (abs(x)<=1) and ((x>=0) and (y<=x) or (x<0) and (y<-x));
end;
var x,y:real;
begin
x:=-1.5;
while x<=1.5 do
 begin
  y:=-1;
  while y<=1 do
   begin
    writeln('x=',x:4:1,' y=',y:5:2,' U=',U(x,y):6);
    y:=y+0.25;
   end;
  x:=x+0.5;
 end;
end.

А всю возню с таблицей оставляю Вам.

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

@Kepblood 0 / 0 / 0 Регистрация: 21.01.2019 Сообщений: 19

	Табулирование функций в Pascale 21.01.2019, 21:30. Показов 670. Ответов 1 Метки нет (Все метки) Необходимо протабулировать функции, зависящие от двух переменных или от нескольких параметров. Результаты табулирования оформить в виде одной таблицы или совокупности таблиц. Параметры таблицы (число колонок, их ширину) вводить с экрана. Для введенной информации о таблицах организовать минимальную проверку на достоверность: таблица должна располагаться на видимой части экрана, ширина колонок должна быть достаточной для размещения числовых данных. Организовать простейший диалог по вводу корректных данных. Вычислить значение функции: U(x,y):=(y>= -2) and (abs(x)<=1) and ((x>=0) and (y<=x) or (x<0) and (y<-x)) при x, изменяющемся от -1.5 до 1.5 с шагом 0.5, и y, изменяющемся от -1 до 1 с шагом 0.25 . 0