Создать Блок-схему

@Andryuxa1994 · Регистрация: 18.01.2015

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

Pascal
1
2
3
4
5
6
7
8
9
10
11
program ot;
var f:real; x:real;
begin
read(x);
 if (x≤0) 
   then f:=cos(2x)-1
if (x>=-1) and (x<0) or (x>0) and (x<=1)
   then f:=〖5x〗^2-2
            else f:=x^2-e^2x;
writeln(f:2:3);
end.

@Cyborg Drone · 22.01.2015, 03:01

В микрософт ворде писали, да? Выглядит потрясающе. Да, и ещё. Ошибки в программе исправьте для начала, и выложите исправленный вариант в тему. И не из ворда копируйте, пожалуйста.

@JokeR.BY · 22.01.2015, 03:15

подозреваю, что:

Code
1
2
3
≤ -> <=
〖 -> (
〗 -> )

Не по теме:

прэлэстно! ©

@Cyborg Drone · 22.01.2015, 11:31

JokeR.BY, не подозрение это. Я посмотрел юникод, последние два символа - прямо-таки коллекционные. На самом деле, там

8804; -> ≤
12310; -> [(
12311; -> )]

Причём последние два символа (рисовать неохота) я изобразил из двух символов каждый, пары нужно слепить по горизонтали. Получатся такие чертёжики разрезов плоско-вогнутых линз. Называются, не возьмусь перевести на русский, а по английски Left & Right White Lenticular Brackets. Милые такие скобочки.

@JokeR.BY · 22.01.2015, 14:24

Cyborg Drone, да-да, я в курсе как они выглядят по юникоду) речь о "подразумевавшихся". по ходу ворд (или что там было) повеселился слегка)

Не по теме:

именно линзы они мне и напомнили)

@Cyborg Drone · 22.01.2015, 14:43

Не по теме:

JokeR.BY, да я это написал для тех, кто не вполне в теме. Для Вас зачем такое писать, с некоторых пор я уверился, что знаете Вы немало, а уж то, что эту ерунду Вы знаете, у меня сомнений не вызывает.

@Andryuxa1994 · 24.01.2015, 18:02 **[ТС]**

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

@Puporev · 24.01.2015, 19:29

Код.

Pascal
1
2
3
4
5
6
7
8
9
program ot;
var a,f:real;
begin
readln(a);
if a<=0 then f:=cos(2*a)-1
else if (a>0) and(a<=1) then f:=5*a*a-2
else f:=a*a-a*exp(2);
writeln(f:0:3);
end.

Блок-схема.

Новые блоги и статьи Все статьи Все блоги /
Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .

@Cyborg Drone Модератор 10451 / 5746 / 3409 Регистрация: 17.08.2012 Сообщений: 17,478
	22.01.2015, 03:01
	В микрософт ворде писали, да? Выглядит потрясающе. Да, и ещё. Ошибки в программе исправьте для начала, и выложите исправленный вариант в тему. И не из ворда копируйте, пожалуйста. 0

@Cyborg Drone Модератор 10451 / 5746 / 3409 Регистрация: 17.08.2012 Сообщений: 17,478
	22.01.2015, 11:31
	JokeR.BY, не подозрение это. Я посмотрел юникод, последние два символа - прямо-таки коллекционные. На самом деле, там 8804; -> ≤ 12310; -> [( 12311; -> )] Причём последние два символа (рисовать неохота) я изобразил из двух символов каждый, пары нужно слепить по горизонтали. Получатся такие чертёжики разрезов плоско-вогнутых линз. Называются, не возьмусь перевести на русский, а по английски Left & Right White Lenticular Brackets. Милые такие скобочки. 0

@JokeR.BY CAPITAL OF ROCK! 1281 / 708 / 982 Регистрация: 03.03.2010 Сообщений: 2,286
	22.01.2015, 14:24
	Cyborg Drone, да-да, я в курсе как они выглядят по юникоду) речь о "подразумевавшихся". по ходу ворд (или что там было) повеселился слегка) Не по теме: именно линзы они мне и напомнили) 0

@Cyborg Drone
	22.01.2015, 14:43
	Не по теме: JokeR.BY, да я это написал для тех, кто не вполне в теме. Для Вас зачем такое писать, с некоторых пор я уверился, что знаете Вы немало, а уж то, что эту ерунду Вы знаете, у меня сомнений не вызывает. 0

@Andryuxa1994 1 / 1 / 0 Регистрация: 18.01.2015 Сообщений: 21
	24.01.2015, 18:02 [ТС]
	Написать программу и создать блок-схему вычисления функции в заданной точке 0

Создать Блок-схему

Решение