|
|
| Другие темы раздела | |
| Pascal ABC Процедуры и функции 1)uses crt; var i,n:integer; A,Pow: real; begin write('A = '); read(A); write('N = '); read(N); https://www.cyberforum.ru/ pascalabc/ thread1855110.html |
Найти сумму 1/2+2/3+3/4++29/30 Pascal ABC Найти сумму 1/2+2/3+3/4+... +29/30 |
| Pascal ABC Нарисовать N кругов с радиусом от 5 до 50 в случайном месте случайным цветом в рамке Нарисовать N кругов с радиусом от 5 до 50 в случайном месте случайным цветом в рамке. https://www.cyberforum.ru/ pascalabc/ thread1854808.html |
Pascal ABC Удаление строк
https://www.cyberforum.ru/ pascalabc/ thread1854669.html Есть ли в PascalABC.NET ещё какиенибудь функции кроме clearline по удалению строк. |
|
Удалить слова оканчивающие на букву "Е" Pascal ABC В введенной с клавиатуры строке удалить все слова, оканчивающие на букву "Е" Добавлено через 3 часа 44 минуты Если вдруг кому понадобится Var е,s1,s2:string; Begin write('Введите строку: ');readln(е); е:=' '+е;s2:=''; While Pos(' ',е)<>0 do Begin |
Pascal ABC Найти сумму индексов в которых хранится максимальный элемент массива
https://www.cyberforum.ru/ pascalabc/ thread1854247.html Найти сумму индексов в которых хранится максимальный элемент массива const m = 10; var a: array of byte; max_num, max_index: byte; i: byte; begin randomize; |
| Pascal ABC Ошибка: Операция '<>' не применима к типам integer и boolean Уважаемые форумнечане, подскажите как решить данную проблему, программа выдает ошибку "pas1.pas(5) : Операция '<>' не применима к типам integer и boolean " var n, m: integer; begin read (n); m:=2; while m-1* m+1 <> n and m < n do m:= m + 1; if m < n then https://www.cyberforum.ru/ pascalabc/ thread1854012.html |
Обработка строковых величин Pascal ABC Отчислить текст, уничтожая в нем лишние промежутки, оставляя только по одному промежутке между словами. |
| Pascal ABC Множества.Напечатать в алфавитном порядке буквы, которые встречаются хотя бы один раз в четных словах Слова в тексте разделены пробелами. Напечатать в алфавитном порядке буквы, которые встречаются хотя бы один раз в четных словах. Нужна помощь! https://www.cyberforum.ru/ pascalabc/ thread1853524.html |
Pascal ABC Генерация случайных чисел.
https://www.cyberforum.ru/ pascalabc/ thread1853457.html 1. Получить случайным образом 10 цифр , моделирующие стоимость игральных карт (случайное число от 6 до 14). Результат вывести в виде числа (для 6,7,8,9,10) или слова "валет" для 11, "дама" для 12, "король" для 13, "туз" для 14). 2. Получить случайным образом 10 действительных чисел от (-50 до 50), вывести их на экран и найти наибольшее из них. |
|
Pascal ABC Найти расстояние от точки (x; y) на плоскости до ближайшей точки единичного круга - Pascal ABC Прошу помочь разобраться в данной теме. Как вообще решать данного типа задачи? Даны координаты точки на плоскости (x; y). Надо найти расстояние от точки (x; y) на плоскости до ближайшей точки единичного круга с центром в начале кординат. |
Pascal ABC Последовательность чисел Фибоначчи Последовательность чисел Фибоначчи u0,u1,… образуется по закону u0=0; u1=1; ui=ui-1+ui-2 (i=2,3,…). Последовательность f0,f1,… образуется по закону f0=0; f1=1; fi=fi-1+fi-2+ui-2 (i=2,3,…). Дано натуральное n>1. Распечатать f0,f1,…, fn . Постарайтесь обойтись без массивов – в задаче нет острой необходимости сохранения значений ui,fi. Добавлено через 3 часа 22 минуты Ладно, разобрался var... https://www.cyberforum.ru/ pascalabc/ thread1852996.html |
|
0 / 0 / 0
Регистрация: 20.11.2016
Сообщений: 2
|
|
| 0 | |
Выполнить чертеж детали - Pascal ABC - Ответ 979158320.11.2016, 12:57. Показов 2979. Ответов 3
Метки (Все метки)
помогите выполнить чертеж, а то я не знаю как Вернуться к обсуждению: Выполнить чертеж детали Pascal ABC
0
|
|
| 20.11.2016, 12:57 | |
|
Готовые ответы и решения:
3
Выполнить чертеж детали
Составить программу, которая выполняет чертеж детали и вычисляет её площадь |
| 20.11.2016, 12:57 | |
| 20.11.2016, 12:57 | |
|
Помогаю со студенческими работами здесь
0
По желанию пользователя выполнить чертёж одной из деталей
Чертеж детали Создать чертёж детали |
Наверх