Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Что будет напечатано в результате выполнения следующего фрагмента программы? Что будет напечатано в результате выполнения следующего фрагмента программы? x := 5; y := 4; z := 2; s := x + y + z; If s < 1 Then begin If (x < y) And (x < z) Then x := (y + z) / 2; If (y < x) And (y < z) Then y := (x + z) / 2; If (z < x) And (z < y) Then z := (x + y) / 2; end Else https://www.cyberforum.ru/ pascal/ thread2357018.html Pascal Задание по информатике "Комета Бармалея"
Задача 1. Комета Бармалея Как известно, комета Бармалея видна с Земли каждые C лет. Любопытно, что это происходит в годы, кратные C, т.е. C, 2×C, 3×C и т.д. Не каждому суждено увидеть эту комету хотя бы однажды в жизни. Впрочем, находятся счастливые долгожители, заставшие её прилёт даже несколько раз. Считается, что впервые эту комету увидел и документировал знаменитый средневековый...
Pascal Заполните квадратную матрицу Плиз помогите только начинаю программировать!!! Нужно реализовать на Pascale. Заполните квадратную матрицу Х(7,7) следующим образом: элементы, расположенные на главной диагонали, примите равными 1; выше главной диагонали - сумме индексов; ниже - их разности https://www.cyberforum.ru/ pascal/ thread2356860.html Pascal Число и его слагаемые Построить таблицу всех различных разбиений заданного натурального числа N на сумму трех натуральных слагаемых (разрядов разбиения) (разбиения, отличающиеся порядком слагаемых, различными не считаются). Разряды разбиения заполнять от младшего к старшему (справа налево), так что если преобразовать значения разрядов в цифры в системе счисления по основанию 100 и из них сформировать число, то... https://www.cyberforum.ru/ pascal/ thread2356602.html
Pascal Найти среднее значение элементов заданного вещественного массива размером 10
Найти среднее значение элементов заданного вещественного массива размером 10. Элементы массива ввести с клавиатуры. Преобразовать исходный массив, вычитая из каждого элемента среднее значение. Преобразованный массив вывести на экран.
Pascal Программа на записи https://www.cyberforum.ru/ pascal/ thread2356359.html
Запись типа OP_sys с четырьмя полями, содержащими название операционной системы мобильного телефона, число запросов на нее в Яндексе, число упоминаний про нее в Яндексе, отношение числа запросов к числу упоминаний. Значения для первых трех полей взять из табл. №15, значения для четвертого поля вычислить и поместить в него. Вывести записи с ОС, в которых число упоминаний в Яндексе меньше...
Pascal Задача на нахождение значения функции https://www.cyberforum.ru/ pascal/ thread2356129.html
Надо написать программу которая находит значение функции e-x2 через ряд Тейлора, она работает от -4 до 4, хотя должна от минус бесконечности до положительной. Помогите, братцы( var n, k, e: integer; x, y, y1, xmin, xmax, d, p, t: real; begin write('Введите xmin и xmax: ');//диапазон иксов readln(xmin, xmax); write('Введите Е и N: ');//Е-знак после запятой(обратный эпсилон),...
Вычислить n!/(2n)! Pascal
Вычислить Σ n=1 to infinity n!/(2n)! Суммировать до тех пор, пока очередное слагаемое не будет меньше 0,0001.
Pascal Надо составить программу в Паскале, которая будет выводить на экран все подмножества множества {1, 2, 3, 4} надо составить программу в Паскале, которая будет выводить на экран все подмножества множества {1, 2, 3, 4}. Используя тип данных set https://www.cyberforum.ru/ pascal/ thread2355874.html Pascal Объединение 3х методов решения СЛАУ в Pascal https://www.cyberforum.ru/ pascal/ thread2355843.html
Нужно объединить 3 метода: Холецкого, Крамера и Гаусса. Это возможно сделать в Pascal? Понято, что начало элементарно: writeln ('Калькулятор СЛАУ '); writeln('Выберите метод решения: '); writeln('• H — метод Холецкого '); writeln('• G — метод Гаусса '); writeln('• K — метод Крамера '); readln(m); if m=h then
Pascal Поменять наименьшее и наибольшее числа местами
Вот есть программа которая меняет наименьшее и наибольшее числа местами, но программа работает, но не выдаёт массив обратно в документ, помогите исправить uses crt; const n=20; var a: array of integer; i,imax,imin: byte; t: text; buf: integer; begin assign(t,'C:\out.txt'); imax:=1; imin:=1;
Pascal Типизированный файл вещественных чисел: после заданной компоненты необходимо вставить K элементов https://www.cyberforum.ru/ pascal/ thread2355725.html
Создайте типизированный файл вещественных чисел. Задайте с клавиатуры номер компоненты N, после которой необходимо вставить K элементов файла. Выведите компоненты исходного и дополненного файлов. P.S. есть данный код отсюда не могу переделать под условие :-| uses crt; var f:file of real; n,k,i,j:integer; a:real; begin clrscr; randomize; assign(f,'fileF');
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
24.11.2018, 09:40 0

Правильно ли составлена блок-схема? - Pascal - Ответ 13090013

24.11.2018, 09:40. Показов 1580. Ответов 5
Метки (Все метки)

Ответ

В принципе верно, даже красиво, только как-то непривычно.
Посмотрите как рисует программа редактор, не по ГОСТ но алгоритм верный, сравните.

Вернуться к обсуждению:
Правильно ли составлена блок-схема? Pascal
Миниатюры
Правильно ли составлена блок-схема?   Правильно ли составлена блок-схема?  
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
24.11.2018, 09:40
Готовые ответы и решения:

Проверьте, правильно ли составлена блок-схема
program first; var v,p,s : array of integer; i(* 1..2 работник*), a (*общее количество женщин*),b (* количество женщин в возрасте до...

Проверьте пожалуйста правелая ли блок схема составлена!!!
Вот код программы: program proga1; var a,b:integer; procedure Drob(NN:integer;M:integer); type TArr=integer; TAr=array of...

Правильно ли составлена функция?
Функция F вычисляется следующей программой: ? function F(X:integer): integer; begin if X=1 then F:=1 else if Odd(X) then...

5
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
24.11.2018, 09:40
Помогаю со студенческими работами здесь

Правильно ли составлена блок-схема?
Проверте пжлст блок схему! (вот сама задача https://www.cyberforum.ru/cpp-beginners/thread348175.html Вот блок схема!

Правильно ли составлена схема?
Console.Write(&quot;a= &quot;); int a = int.Parse(Console.ReadLine()); Console.Write(&quot;b= &quot;); int b =...

Правильно ли составлена схема?
class Program { static double f(double x) { double y; if (x &gt; 3) y...

Правильно ли составлена схема?
class Program { static double f(double x1, double y1, double x2, double y2) { double d =...

Правильно ли составлена схема данных?
Здравствуйте! Составил схему данных для БД каталога деталей авто. Вроде, все норм. Но все равно, интересно услышать мнение более...

0
Новые блоги и статьи
Ошибка Docker "Got permission denied while trying to connect to the Docker daemon socket at"
hw_wired 14.02.2025
Разработка с использованием Docker может иногда преподносить неожиданные сюрпризы, и одним из самых распространенных камней преткновения становится ошибка с отказом в доступе к демону Docker. . . .
Ошибка "No 'Access-Control-Allow-Origin' header is present on the requested resource"
hw_wired 14.02.2025
При разработке современных веб-приложений нередко сталкиваешься с ошибкой "No 'Access-Control-Allow-Origin' header is present on the requested resource". Эта проблема возникает из-за политики. . .
Как закрыть порт в Linux
hw_wired 14.02.2025
Управление сетевыми портами в Linux - непростая, но важная задача для обеспечения безопасности системы. Каждый открытый порт - это потенциальная уязвимость, через которую злоумышленики могут. . .
Ошибка Angular "Can't bind to 'taskForm' since it isn't a known property of 'form'"
hw_wired 14.02.2025
При разработке веб-приложений на Angular можно столкнуться с ошибкой "Can't bind to '' since it isn't a known property of 'form'". Эта ошибка появляется в консоли браузера когда мы пытаемся. . .
Сообщение Git "Pulling without specifying how to reconcile divergent branches is discouraged"
hw_wired 14.02.2025
При работе с системой контроля версий Git многие разработчики сталкиваются с предупреждающим сообщением "Pulling without specifying how to reconcile divergent branches is discouraged". Это. . .
Как настроить количество пробелов в отступах табов в Visual Studio Code
hw_wired 14.02.2025
Visual Studio Code предоставляет несколько гибких способов настройки табуляции, каждый из которых имеет свои преимущества. Самый простой и наглядный метод - через графический интерфейс настроек, где. . .
Что означает знак восклицания в TypeScript
hw_wired 14.02.2025
TypeScript - удивительный язык программирования, который предоставляет множество возможностей для работы с типами данных. Особый интерес вызывает оператор утверждения ненулевого значения, который. . .
Как свернуть/скрыть секции кода в Visual Studio Code
hw_wired 14.02.2025
Ежедневно мы работам с файлами, содержащими сотни и тысячи строк кода. Навигация по такому объему становится настоящим испытанием, особенно когда нужно быстро найти нужный метод или переменную. . . .
Автоматическое создание файла requirements.tx­t в Python
hw_wired 14.02.2025
Дружелюбная среда для разработки на Python, один из самых широко используемых языков программирования, состоит не только из самого кода, но и целого ряда важных компонентов. И если вы когда-нибудь. . .
Передача переменных окружения в контейнер Docker
hw_wired 14.02.2025
При работе с Docker контейнерами возникает необходимость передать различные настройки и конфигурационные параметры - от строк подключения к базам данных до API ключей. И хотя можно жестко прописать. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru