Построение блок-схем

@lusy · Регистрация: 18.03.2010

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

Помогите пож построить блок схемы, к этим кодам:

Pascal

uses crt;
var a,b,c,d,f:real;
begin
 clrscr;
 write('A B C D -> ');
 readln(a,b,c,d);
 if a<>0 then
 begin
  f:=(a-b)/2/a-3*c*d;
  writeln('F=',f:0:4);
 end else writeln('Недопустимое значение');
 readln;
end.

Pascal

Var x,y:real;
function fnk(a:real):real;
begin
if a<=3 then fnk:=a*a*a-3*a+9;
else fnk:=1/(a*a-6)
end;
begin
writeln('enter x');
readln(x);
y:=fnk(x);
writeln('y=', y:5:3)
end.

@WolfCF · 23.03.2010, 11:56

к первой задаче Название: 1.gif
Просмотров: 102

Размер: 3.0 Кб

2ая задача:

основная программа Название: 2.gif
Просмотров: 138

Размер: 1.7 Кб

функция fnk Название: 2.1.gif
Просмотров: 137

Размер: 1.8 Кб

у себя во 2ой программе в 4ой строчке уберите точку с запятой.

Новые блоги и статьи
Как конвертировать видео в GIF hw_wired 24.01.2025 В современном мире анимированные изображения стали неотъемлемой частью цифровой коммуникации. Формат GIF (Graphics Interchange Format) представляет собой особый тип файлов, который позволяет. . .	Как скопировать текст в буфер обмена на JavaScript во всех браузерах hw_wired 24.01.2025 Копирование текста в буфер обмена стало неотъемлемой частью современных веб-приложений, значительно улучшающей пользовательский опыт и упрощающей работу с контентом. В эпоху активного обмена. . .	Как скрыть клавиатуру на Android hw_wired 24.01.2025 При разработке Android-приложений часто возникает необходимость управлять видимостью экранной клавиатуры для улучшения пользовательского опыта. Одним из наиболее эффективных способов контроля. . .	Как обучить нейросеть создания картинок на Python bytestream 24.01.2025 В эпоху цифровых технологий искусственный интеллект становится неотъемлемой частью творческого процесса. Особое место в этой области занимает разработка и обучение нейронных сетей для создания. . .	Как обучить нейросеть генерации текста на Python bytestream 24.01.2025 В современном мире искусственный интеллект и машинное обучение становятся неотъемлемой частью многих технологических решений. Одной из наиболее интересных и востребованных задач в этой области. . .	Машинное обучение на Python bytestream 24.01.2025 Введение в машинное обучение на Python Машинное обучение представляет собой одну из наиболее динамично развивающихся областей информационных технологий, которая позволяет компьютерным системам. . .
Как удалить вирус-майнер с компьютера hw_wired 24.01.2025 Вирусы-майнеры стали одной из наиболее серьезных угроз для пользователей компьютеров. Эти вредоносные программы тайно используют вычислительные ресурсы зараженного устройства для добычи криптовалюты. . .	Что такое веб-сервер, для чего он нужен и как работает bytestream 24.01.2025 В современную эпоху цифровых технологий веб-сервер является фундаментальным компонентом интернет-инфраструктуры, обеспечивающим функционирование множества онлайн-сервисов и веб-сайтов. Этот. . .	Как в цикле for перебрать все элементы в словаре в Python bytestream 24.01.2025 Словари в Python представляют собой мощные структуры данных, которые позволяют хранить информацию в формате ключ-значение. Эта особенность делает их незаменимыми при работе с данными, где требуется. . .	Как отменить rebase в Git hw_wired 24.01.2025 Git rebase представляет собой мощный инструмент для управления историей коммитов в системе контроля версий Git. Этот механизм позволяет разработчикам изменять последовательность, комбинировать или. . .	Как поменять цвет input placeholder с помощью CSS bytestream 24.01.2025 В веб-разработке оформление элементов пользовательского интерфейса играет ключевую роль в создании привлекательного и интуитивно понятного дизайна. Особое внимание уделяется формам ввода данных, где. . .	Как перебрать все значения в перечислении (enum) в C# bytestream 24.01.2025 Перечисление (enum) в языке программирования C# представляет собой специальный тип данных, который позволяет определить набор именованных констант. Этот мощный инструмент особенно полезен, когда. . .

@WolfCF 3312 / 1374 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	23.03.2010, 11:56	2
	к первой задаче 2ая задача: основная программа функция fnk у себя во 2ой программе в 4ой строчке уберите точку с запятой. 1

Опции темы