|
|
Другие темы раздела | |
Turbo Pascal Составить программу гороскоп Доброго времени суток народ! Господи, торопился как мог, блин фамилию не правильно написал, но это не главное... Вообщем у меня проблема - Ссесия... Закрываюсь как могу, и пришло время закрывать Программирование. Народ, выручайте... Училка денег не берёт, только знаниями, но на занятиях хреново объясняет... Помогите составить 4 программы, вот условие: 2. Составить программу которая... https://www.cyberforum.ru/ turbo-pascal/ thread235438.html |
Реализовать операции с двунаправленными списками Turbo Pascal Написать программу, реализующую операции работы с двунаправленными списками. Помогите пожалуйста!!! Заранее спасибо!!! |
Turbo Pascal Определить каким будет К-й день года если 1 января понедельник
https://www.cyberforum.ru/ turbo-pascal/ thread235431.html Оператор выбора Дано целое число К (1 <=K<=360). Определить каким будет К-й день года если 1 января понедельник. |
Turbo Pascal Добавить строку S в начало текстового файла Дана строка S и текстовый файл, созданный заранее в редакторе Блокнот. Добавить строку S в начало текстового файла. https://www.cyberforum.ru/ turbo-pascal/ thread235400.html |
Переписать строки файла f1 в новый текстовый файл g, заменив в нем символы 0 на символ 1 Turbo Pascal С помощью текстового редактора создать текстовый файл f1. Переписать строки файла f1 в новый текстовый файл g, заменив в нем символы 0 (нуль) на символ 1 и наоборот. |
Turbo Pascal Составить блок-схему для программы вычисления значений функции Помогите нарисовать блоксхему плиз(Срочно) вот код: Program name; Const h=0.5; Var x,y,e:real; Begin Writeln; Writeln (‘Выполнили: ’); Writeln (‘Вариант ’); Writeln (‘Программа для заполнения таблицы значений функций’); https://www.cyberforum.ru/ turbo-pascal/ thread235376.html |
Turbo Pascal Найти в последовательности количество чётных, положительных, отрицательных чисел
https://www.cyberforum.ru/ turbo-pascal/ thread235375.html Дана последовательность чисел заканчивающаяся на ноль, найти в ней: 1. количество чётных чисел 2. количество положительных чисел 3. количество отрицательных чисел Там будут некоторое количество чисел, например: 2 8 -7 -2 8 9 0 И надо что бы вывело: Кол-во чётных чисел= 4 Кол-во положительных чисел= 4 Кол-во отрицательных чисед= 2 |
Составление блок-схем по коду Turbo Pascal Добрый день, программисты!ПОМОГИТЕ составить схему из приведенного ниже кода uses crt; const sp:array of string=('Moskva','Orel','Glazov','Kolomna','Vanino','Kaluga','Serov','Rostov','Orsha','Klin'); var i,j:integer; x:string; begin clrscr; writeln ('Ishodnyj spisok:'); for i:=1 to 10 do writeln(sp); |
Turbo Pascal Уплотнить матрицу, удаляя из нее строки и столбцы, заполненные нулями. Уплотнить заданную матрицу, удаляя из нее строки и столбцы, заполненные нулями. Найти номер первой из срок, содержащих хотя бы один положительный элемент. помогите написать пожалуйста https://www.cyberforum.ru/ turbo-pascal/ thread235352.html |
Turbo Pascal Найти в натуральном числе нечётные цифры и вывести 1 и последнюю цифры
https://www.cyberforum.ru/ turbo-pascal/ thread235351.html Дано натуральное число, найти: 1. количество нечётных цифр 2. вывести первую и последнюю цифры данного числа |
Заменить элементы главной диагонали суммой всех положительных элементов Turbo Pascal написать программу формирования массива размером 5*5 с помощью датчика случайных чисел. заменить в нём значение элементов главной диагонали на сумму всех положительных значений элементов массива. вывести на экран исходный и измененный массив uses crt; var matr: array of integer; var i,j,sum: integer; begin clrscr; Randomize; sum:=0; |
Turbo Pascal Вывод эл одном массива в 6 колонок с доп условием вывести все найденные значения в шесть колонок, причем эл нечетного столбца или четной строки необх заключить в квадратные скобки. в принципе все работает, но препод требует четких колонок. при некоторых значениях формата вывода получается неплохо, но ей не нравится. требует большего промежутка между колонками. числа в массиве как однозначные,так и трехзначные + скобки. помогите пожалуйста, при... https://www.cyberforum.ru/ turbo-pascal/ thread235346.html |
Anton.
|
||||||
0 | ||||||
Перемещение линии по радиусу. - Turbo Pascal - Ответ 132604229.01.2011, 12:04. Показов 1422. Ответов 3
Метки (Все метки)
всем привет!решил создать программу что-ввиде радара. но не знаю как оживить только одну белую линии,чтобы она перемещалась по радиусу окружности. просто хочеться разобраться. вот есть только код простой картинки:
Вернуться к обсуждению: Перемещение линии по радиусу. Turbo Pascal |
29.01.2011, 12:04 | |
Готовые ответы и решения:
3
Перемещение линии по оси х Осуществить вращение линии и ее перемещение Перемещение нарированный линии с клавиатуры Как сделать перемещение линии на канве? |
29.01.2011, 12:04 | |
29.01.2011, 12:04 | |
Помогаю со студенческими работами здесь
0
Перемещение линии при нажатии на кнопку Перемещение точки по линии из 1 обьекта в другой Перемещение курсора, черчение линии. События MouseUp и MouseDown Форма делится на сектора. Курсором мыши можно рисовать линии. Цвет линии зависит |