|
|
Другие темы раздела | |
Free Pascal Виртуальная регистратура О Ч Е Н Ь С Р О Ч Н О !! Ребята,помогите пожалуйста. Я девушка-будуший врач, пишу программу на дурацком Free паскале, для дурацкого зачета по программированию. Задача такая. Виртуальная регистратура. Есть глав врач, просто врач и пациент. Глав врачу присваевается номер 0. Просто врачам от 1 до 20. Пациенты от 21 до 100. Система такая, Пачиент заходит программу, вводит "2"(ну тип он пациент,а не... https://www.cyberforum.ru/ free-pascal/ thread32708.html |
Free Pascal Нарисовать корабль задали корабль нарисовать в паскале 7.0...но графику тему проболел и ниче не понимаю..самоучители не помогли....толком ничего не получаеться...надеюсь на вашу помош |
Free Pascal Заполните массив случайными целыми числами и отсортируйте его по возрастанию
https://www.cyberforum.ru/ free-pascal/ thread29895.html Помогите решить задачки, ни чего не понимаю как делать,а утром надо сдать... 1.Напишите программу возведения целого числа 0 < x < 10 в натуральную степень k. Оба числа вводятся пользователем с клавиатуры. Выполните это задания тремя различными способами – используя конструкции цикла со счетчиком, цикла с условием и цикла с постусловием. Изучите циклические конструкции (for to do, while do,... |
Free Pascal Доклад на тему "Графические возможности среды Pascal" Я учусь в 9 классе Помогите пожалуйсто надо написать доклад на тему "Графические возможности среды Pascal" Можно презинтацию, или дайте ссылку где можно найти материал на данную тему https://www.cyberforum.ru/ free-pascal/ thread29330.html |
Описать функцию вычисления гипотенузы треугольника Free Pascal Всем привет. Нужно соорудить функцию вычисления гипотенузы треугольника. Элементы берём из массива 5 х 2 . Где каждая из пяти строк - стороны треугольника. Находить все гипотенузы,если возможно. Из задания понял,что работа функции каким то образом должна поддерживать и дробные числа... Прошу помощи. |
Free Pascal Описать работу с прайс-листом Всем киберцам привет! Требуется такое: Вывод операций из меню 1)Ввод данных 2)Просмотр введённых данных 3)Коррекция введённых данных 4)Сортировка 5)Удаление 6)Поиск(по введённому в строку) А задача такова. https://www.cyberforum.ru/ free-pascal/ thread26996.html |
Free Pascal Заменить минимальное одной матрицы на минимальное другой матрицы Создать матрицы А и В. Вывести их. Определить минимальное в матрице А и минимальное в матрице В. Заменить минимальное одной матрицы на минимальное другой матрицы. https://www.cyberforum.ru/ free-pascal/ thread26480.html |
Факториал Free Pascal program Project2; {$APPTYPE CONSOLE} uses SysUtils; var n,f,i:integer; begin write(n); readln(n); for i:=1 to n do repeat f:=i*(i+1) |
Free Pascal Создать файл f1 из целых чисел...
https://www.cyberforum.ru/ free-pascal/ thread25635.html Создать файл f1 из целых чисел. Записать в файл f2 наибольшее из первых 5 компонент, затем из следующих 5 и т.д. Последняя группа может содержать меньше десяти компонент. Общее примечание. В данной лабораторной работе необходимо сделать типизированный файл, где каждой компонентой будет число, массив или матрица. Количество компонент заранее не определено, поэтому, при обработке файла... |
Free Pascal Матрица,файл с её элементами,Вычесление чётных чисел. Вывод матрицы и результата. Сообственно,помогите с написанием. 1)Матрица 8 на 4,а её элементы считываются из файла (пускай будет ааа.тхт). 2)Сумма чётных чисел (те что на 2 без остатка делятся). 3)И собственно вывод матрицы и суммы. Напишите код,позязя. :) https://www.cyberforum.ru/ free-pascal/ thread25570.html |
Free Pascal Круг и нахождение точки ммм ... прошу помощи. Я как таковые круги и т.д. не изучал,но требуется сделать так как на картинке. но без графического режима с простой проверкой где точки внутри а где снаружи. при введении координат внутри - выдавал ('Точка внутри') и наоборот. Помогите :help: |
Free Pascal Переставить элементы массива в обратном порядке Дан массив из N целых чисел. Переставить элементы массива в обратном порядке, т.е первый на место последнего, второй на место предпоследенего и т.д. В матрице D максимальное значение заменить средним арифметическим чисел строки, в которой находится максимальный элемент. Без процедур ) https://www.cyberforum.ru/ free-pascal/ thread23528.html |
Пробующий
185 / 98 / 10
Регистрация: 28.04.2009
Сообщений: 1,101
|
|
04.05.2009, 21:52 [ТС] | 0 |
Алгоритм Эратосфена - Free Pascal - Ответ 15355404.05.2009, 21:52. Показов 4491. Ответов 10
Метки (Все метки)
Ответ
Ученый.
Добавлено через 1 минуту 7 секунд Ну а код нормальный, кто-нибудь пробовал тестировать? Вернуться к обсуждению: Алгоритм Эратосфена Free Pascal
0
|
04.05.2009, 21:52 | |
Готовые ответы и решения:
10
Дано натуральное число n. Найти все меньшие n простые числа, используя решето Эратосфена Алгоритмом Решето Эратосфена найти четвёрки меньших N простых чисел, принадлежащих одному десятку С помощью алгоритма Решето Эратосфена найти четвёрки меньших N простых чисел, принадлежащих одному десятку Построено Решето Эратосфена. Требуется найти такое N, что разница между простыми числами не будет превышать 255 |
04.05.2009, 21:52 | |
04.05.2009, 21:52 | |
Помогаю со студенческими работами здесь
0
Решето Эратосфена Решето Эратосфена Нахождение суммы элементов в решете Эратосфена Поиск простых чисел методом решета Эратосфена. |