Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Free Pascal Игра "Угадай число". Применять процедуры или функции Ребят,всем доброго времени суток. Уже долго мучаюсь,не могу понять как функцию засунуть. Программа звучит так: Программа случайным образом загадывает четырехзначное число,пользователь угадывает.... Только я не могу понять как сделать это через процедуры и функции. Значит можете сделать без них? Тогда выложите то что сделали. https://www.cyberforum.ru/ free-pascal/ thread1131951.html Free Pascal Организация списков Создать связанный список из записей, содержащих сведения о животных (класс животного, количество, фамилия хозяина), реализовать операции со связанным списком: запись первым в список, удаление первого... https://www.cyberforum.ru/ free-pascal/ thread1132171.html
Free Pascal Размер куска строки из TStringstream https://www.cyberforum.ru/ free-pascal/ thread1132121.html
Доброго дня. Крайне неприятная ситуёвина. Нужно определять размеры отдельных кусков строк из потока. Самый простой и тупой вариант - скопировать из DataString нужный кусок в переменную Ansistring и... Самый простой и тупой вариант - скопировать из DataString нужный кусокСамое интересное - это узнать, как ты определяешь "нужность" куска. Пока этой информации нет - задача вообще не ясна.
Free Pascal Обменные сортировки https://www.cyberforum.ru/ free-pascal/ thread1132176.html
Задан массив AX (N). Добавить массив С(К). Выполнить обменную сортировку. В полученном векторе найдите количество чисел кратных К.
Напечатать значения нечетных значений элементов массива Free Pascal
Заполнить массив К(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти. Напечатать значения нечетных значений элементов массива.... Один уже из за этой задачи пошел служить: https://www.cyberforum.ru/turbo-pascal/thread1125795.html
Free Pascal Посчитать в сколько раз в натуральном числе N встретилась цифра M. Циклы с пред- и постусловием
В программе должны быть применены операторы repeat,until(по теме).Ну и еще там наверное while...do. Задание: Посчитать в сколько раз в натуральном числе N встретилась цифра M var k, m, n : integer; begin repeat write('введите натуральное число: '); readln(n); if n <= 0 then writeln('это не натуральное число!') until n > 0; repeat ...
Free Pascal Максимально возможная площадь прямоугольника https://www.cyberforum.ru/ free-pascal/ thread1132457.html
Помогите на олимпиаде была вот такая задача: Паша нарисовал на листке бумаги прямоугольник. Он не помнит, какую площадь имел этот прямоугольник, но помнит, что выполнялись следующие утверждения:... Рано вам на олимпиаду, уважаемый. Я так и не понял, что такое stdout := p * p div 4 но так будет гораздо лучше program q; var numIn,a,b:dword; begin readln(numIn); numIn:=numIn shr 1;...
Free Pascal Поиск минимального элемента в массиве, который не меньше N, функция не работает при некоторых значениях Функция должна находить минимальный элемент в массиве, который больше N. Допустим массив 6, 8, 3, 9,10; N = 4. выведется 6. Но если нужный элемент стоит первым функция выводит следующий, то есть... function min(N : integer; arr : array of integer; lenght : integer) : integer; При таком объявлении параметров первый элемент массива имеет нулевой индекс, т.е. надо начинать с mina:=arr; https://www.cyberforum.ru/ free-pascal/ thread1132002.html
Free Pascal Дан массив A(N) (N - четное). Сформировать массив B(M), элементами которого являются средние арифметические https://www.cyberforum.ru/ free-pascal/ thread1131672.html
Помогите решить задачу,пожл! Дан массив A(N) (N - четное). Сформировать массив B(M), элементами которого являются средние арифметические соседних пар рядом стоящих в массиве A чисел. Например,... {$mode objfpc} const n = 8; var a : array of real = (1, 3, 5, -2, 0, 4, 0, 3); b : array of real; i : integer;
Free Pascal Бинарные операции Помогите решить задачу: Недавно Паша узнал, что во многих языках программирования есть бинарные операции «И» и «ИЛИ». Операндами у таких операций являются целые числа. Для того, чтобы найти... Это неправильно просить решить задачу из идущей олимпиады.. Прошу не оказывать помощь ТС тыц https://www.cyberforum.ru/ free-pascal/ thread1132448.html
Free Pascal Составить программу для нахождения наибольшего общего делителя и наименьшего общего кратного двух натуральных чисел Помогите решить, пжл. Составить программу для нахождения наибольшего общего делителя и наименьшего общего кратного двух натуральных чисел (НОК(A, B)= \frac{A*B}{NOD A, B} ). program Nod_n_Nok; function nod(a, b : longint) : longint; begin if a = b then nod := a else if a > b then nod := nod(b, a - b) else nod := nod(a, b - a) https://www.cyberforum.ru/ free-pascal/ thread1131651.html Free Pascal Можно ли таблицы из excel перевести в sql? можете дать краткий пример, хотя бы по одной таблице и по одному полю или что то другое от чего можно было бы оттолкнуться... Уточните, что вы имеете ввиду? Вытащить данные из таблицы? Если да, то: под виндой через OLE, наличие установленного офиса обязательно; если xlsx, то распаковываем zip архив и вынимаем данные из... https://www.cyberforum.ru/ free-pascal/ thread1131919.html
Модератор
10131 / 5465 / 3370
Регистрация: 17.08.2012
Сообщений: 16,703
30.03.2014, 15:49 0

Простое или составное - Free Pascal - Ответ 5973271

30.03.2014, 15:49. Показов 1452. Ответов 3
Метки (Все метки)

Ответ

Не по теме:

Ромаха, я знаю. Код был приведён, но не понят. Так что, думаю, лишний непонятный код koloboksanу не поможет, а для остальных полезно.



Вернуться к обсуждению:
Простое или составное Free Pascal
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.03.2014, 15:49
Готовые ответы и решения:

Определить введенное число простое или составное
Определить введенное число простое или составное. Очень нужна... Можно на мыло jiehuh-das@ya.ru

Что больше - минимальное простое число в матрице или максимальное составное?
4. Дана матрица А(3,4). Что больше: минимальное простое число в ней или максимальное составное? Помогите пожалуйста, не понимаю ничего!!!

Нужно определить простое число или нет
Помогите кто может написать программу, которая могла бы определить простое число или нет (что бы число состояло не менее чем из 64 символов...

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

Составное условие в цикле while
Как задать составное условие в цикле while? Условием являются 3 неравенства: a&gt;b+c, b&gt;a+c, c&gt;b+a. Паскаль компилирует, но при...

Определить, имеется ли составное двузначное число ниже главной и побочной диагоналей матрицы
Дана целочисленная квадратная матрица. Определите, имеется ли среди элементов, расположенных ниже ее главной и побочной диагоналей хотя бы...

Определить, имеется ли среди элементов ниже главной и побочной диагоналей хотя бы одно составное число
Дана целочисленная квадратная матрица. 1) определить, имеется ли среди элементов, расположенных ниже её главной и побочной диагоналей...

Простое или составное число
Не могу понять, почему мой код не работает Если ввожу, например, 13 пишет, что это составное число #include &lt;iostream&gt; ...

Простое или составное число
При проверке чисел 9 и 15 прога выдает результат, что они простые. И не знаю как засунуть 1 и 2 для проверки. import java.util.*; ...

0
Новые блоги и статьи
Система безопасности в Laravel: возможности и примеры
Wired 18.02.2025
Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
Давайте сравним Django и Laravel
Wired 18.02.2025
Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .
Laravel или React - что лучше?
Wired 18.02.2025
В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .
Laravel 11: новые возможности, гайд по обновлению
Wired 18.02.2025
Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .
Миграции в Laravel
Wired 18.02.2025
Разработка веб-приложений на Laravel неразрывно связана с управлением структурой базы данных. При работе над проектом часто возникает необходимость вносить изменения в схему базы данных - добавлять. . .
Аутентификация в Laravel
Wired 18.02.2025
В современном мире веб-разработки безопасность пользовательских данных становится критически важным аспектом любого приложения. Laravel, как один из самых популярных PHP-фреймворков, предоставляет. . .
Laravel или Symfony: что лучше для старта?
Wired 18.02.2025
В веб-разработке выбор правильного фреймворка может стать определяющим фактором успеха проекта. Особенно это актуально для PHP - одного из самых распространенных языков программирования, где Laravel. . .
Что нового в Laravel 12
Wired 18.02.2025
С момента своего появления в 2011 году Laravel постоянно развивается, внедряя инновационные решения и совершенствуя существующие возможности. В начале 2025 года ожидается выход Laravel 12 - новой. . .
Роутер в Laravel: как работать с маршрутами
Wired 18.02.2025
Маршрутизация - один из основополагающих элементов любого веб-приложения на Laravel, определяющий как приложение отвечает на HTTP-запросы к различным URL-адресам. По сути, роутинг - это механизм. . .
Интеграция шаблона Bootstrap в Laravel PHP
Wired 18.02.2025
Разработка веб-приложений в современном мире требует не только надежного бэкенда, но и привлекательного, отзывчивого интерфейса. Laravel, как один из самых популярных PHP-фреймворков, отлично. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru