|
|
| Другие темы раздела | |
| Turbo Pascal Выполнить над числами указанное действие и вывести результат Арифметические действия над числами пронумерованы следующим образом: 1 — сложение, 2 — вычитание, 3 — умножение, 4 — деление. Дан номер действия и два числа A и B (В не равно нулю). Выполнить над числами указанное действие и вывести результат. В общем сама программа получилось . uses crt; var i,a,b: integer; c: real; https://www.cyberforum.ru/ turbo-pascal/ thread61388.html |
Определить расстояние между автомобилями через T часов Turbo Pascal Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу. В общем я составил программу , но мне кажется что неправильно подскажите пожайлуста где ошибка : Program Zadacha; uses crt; var t,v1,v2,s,r:integer; begin clrscr; writeln('skorost 1-go avto :=... |
|
Turbo Pascal Подскажите: запуск графики в TP7
https://www.cyberforum.ru/ turbo-pascal/ thread61151.html При запуске программы, с использованием графики выскакивает черный экран и ничего не происходит. Вот, например, легкая программа, с которой это происходит: Program graphika; Uses crt, graph; var GraphDriver, GraphMode : integer; Begin clrscr; GraphDriver:=detect; InitGraph(GraphDriver, GraphMode, ''); SetColor(4); |
Turbo Pascal Вычислить значение функции с помощью вложенных циклов помогите решить задачу используя вложенный цикл. Нужно вычислить значение функции p=sin(y*x+h)*x*x*x y=0.7(0.2)2.1 x=0.2(0.5)2.2 h=2*y*x при y>=x и h=y/2*x при y<x https://www.cyberforum.ru/ turbo-pascal/ thread61122.html |
|
Turbo Pascal У кого в WinXp turbo pascal загружает проц на 100% ? Как я начинаю вводить данные в паскале проц работает на 100%, когда он просто запущен то вроде ничего такого, а как только начинаешь вводить данные сразу начинается такая ерунда. Пробовал в режиме совместимости - непомогло, как с этим бороться подскажите кто-нибудь плз. |
Turbo Pascal Блок-схема Case
https://www.cyberforum.ru/ turbo-pascal/ thread61073.html Ребята помогите построит блок-схему. Заранее спасибо! Вот текст программы: Program Proverochnaya_4; Type mounth = (jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec); day = 1..31; year = 1900..3000; Var d : day; |
|
Turbo Pascal Зачем нужен тип record, и где он используется?
https://www.cyberforum.ru/ turbo-pascal/ thread61065.html Зачем нужен record и где он используется? |
Turbo Pascal Создать базу данных по компьютерной технике Здравствуйте! Помогите пожалуйста создать базу данных на Turbo Pascal по компьютерной технике. База дынных организует хранение информации таким образом, чтобы ее было удобно: просматривать, пополнять, изменять, искать нужные сведения, делать любые выборки, осуществлять сортировку в любом порядке. Программа осуществляет упорядочение товара по следующим критериям: комплектующие, периферия,... |
|
Turbo Pascal Вывести соответствующий номер столетия по номеру високосного года
https://www.cyberforum.ru/ turbo-pascal/ thread60963.html Оператор цикла For: 1-я задача. Дана строка. Преобразовать все строчные1|прописные2 латинские3|русские4 буквы в прописные1|строчные2. 2-я задача.Дано целое число N (> 0). Вывести сумму 2 + 1/(2!) + 1/(3!) + ... + 1/(N!) (выражение N! — "N факториал" — обозначает произведение всех целых чисел от 1 до N: N! = 1•2•...•N). Полученное число является приближенным значением константы e = exp(1)... |
Turbo Pascal В заданном тексте заменить каждую гласную букву символом ‘*’, а согласную – символом ‘+’,
https://www.cyberforum.ru/ turbo-pascal/ thread60833.html В заданном тексте заменить каждую гласную букву символом ‘*’, а согласную – символом ‘+’, Решил,но ниче не делает!!!Ужас просто! program Projec33; {$APPTYPE CONSOLE} uses SysUtils; Var St,z: string; |
|
Во второй файл записать данные только тех из них, кто на сегодняшний день проработал не менее 5 лет Turbo Pascal Помогите,пожалуйста,последняя задача по файлам! Дан текстовый файл, в котором хранятся данные о сотрудниках фирмы:фамилия,имя, отчество, адрес(улица,дом,квартира) и дата поступления на работу(месяц,год).Во второй файл записать данные только тех из них, кто на сегодняшний день проработал не менее 5 лет.Вывести содержимое полученного файла на экран. |
Turbo Pascal Письмо
https://www.cyberforum.ru/ turbo-pascal/ thread60727.html Дан текст-письмо, состоящий из одного или нескольких предложений на русском языке с возможными лидирующими и концевыми пробелами. Каждое предложение содержит слова, разделённые пробелами, начинается с большой буквы и заканчивается точкой. Других знаков препинания в предложениях нет. В письме могут встречаться имена собственные вида Фамилия Имя Отчество. Замените все включения Фамилия Имя Отчество... |
|
0 / 0 / 0
Регистрация: 05.11.2009
Сообщений: 97
|
|
| 0 | |
Определить, какая из точек удалена от начала координат на большее расстояние - Turbo Pascal - Ответ 33795005.11.2009, 16:30. Показов 6558. Ответов 4
Метки (Все метки)
1. Заданы координаты двух точек на плоскости. Составьте программу, определяющую, какая из точек удалена от начала координат на большее расстояние. 2. Синоптики объявляют погоду на ближайшие дни: 1 – солнце, 2 – дождь, 3 – туман, 4 – ветер. Зная нужную вам погоду, вы принимаете определенное решение: жду нужную погоду, либо – беру отгул, которое выводится на экран. Программа запрашивает ввод нужной погоды и выводит на экран ваше решение на каждый день. 3. for Составить таблицу стоимости порции сыра весом в 50, 100, 15, …, 1000 г (цена одного килограмма сыра определяется по запросу). Результат вывести в виде таблицы: 0 1 2 3 4 5 6 7 8 9 50 100 …………………………….. 1000 Вернуться к обсуждению: Определить, какая из точек удалена от начала координат на большее расстояние Turbo Pascal
0
|
|
Лучшие ответы (2)
| 05.11.2009, 16:30 | |
|
Готовые ответы и решения:
4
Определить какая из точек наименее удалена от начала координат
Определить, какая из трех точек на плоскости наиболее удалена от начала координат Какая из трех точек на плоскости наиболее удалена от начала координат |
| 05.11.2009, 16:30 | |
| 05.11.2009, 16:30 | |
|
Помогаю со студенческими работами здесь
0
Определить, какая из двух точек (x1,y1) и (x2,y2) больше удалена от центра координат Определить, какая из точек дальше от начала координат
|
Наверх