Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Turbo Pascal Действия с массивом Исходный массив должен быть выведен на экран. Все преобразования произво-дить с исходным массивом. После каждого преобразования на экране должно быть пред-ставлено название преобразования и преобразованный массив или значения указанных величин, или соответствующее сообщение. 4.1 Дан массив целых чисел, состоящий из 10 элементов. Заполнить его с клавиа-туры. Найти: − сумму отрицательных... https://www.cyberforum.ru/ turbo-pascal/ thread321042.html	Turbo Pascal Найти все симметричные натуральные числа из промежутка о А до В 2.2 Найти все симметричные натуральные числа из промежутка о А до В (А и В вводятся с клавиатуры).
Turbo Pascal как сделать в порядке возрастания? https://www.cyberforum.ru/ turbo-pascal/ thread321035.html Дано некоторое вещественное значение переменной x напечатать в порядке возрастания ln(x); ln(sqr(x))/ln(10); ln(3)/(ln(x)); ln(5)/ln(sqr(x)); Если при каком-либо x некоторые выражения не имеют смысла. то выдать сообщение об ошибке. не понимаю как правильно сделать сравнение и вывод чтобы работало Добавлено через 10 минут аппппп	Turbo Pascal Паскаль, пару уравнений Здравствуйте, подскажите, что мне нужно прочитать, чтобы решить эти уравнения? http://i075.***********/1106/17/b9ed2d8f6529.jpg p.s. Мало времени, нужно решить мне в кратчайшие сроки. https://www.cyberforum.ru/ turbo-pascal/ thread321034.html
Turbo Pascal Ассемблер в Паскале Здравствуйте, помогите пожалуйста. Дана задача:Дано вещественное число A и целое число N (> 0). Найти A в степени N. Составил алгоритм,все должно работать,но выдает ошибку "Деление на ноль". Сломал уже себе всю голову. Преподаватель сказал, что скорее всего ошибка в raund, но как решить задачу без нее, не могу придумать. Заранее спасибо. uses crt; var x,y,i,d,b,n:integer; a,q:real;	Turbo Pascal Определить, лежат ли точки на окружности радиуса r с центром в начале координат https://www.cyberforum.ru/ turbo-pascal/ thread321031.html заданы координаты 2 точек x1,y1.x2,y2. Определить лежат ли они на окружности радиуса r с центром в начале координат. и вывести соотвествующ. сообщение. формулу знаю, но не могу связать ее с решением r<=Sqrt(sqr(x)+sqr(y));
Turbo Pascal Пожалуйста напишите программу. Вывести на экран все литералы, что включены в данную программу на языке паскаль. Обратите внимание, что закомментированные литералы выводить на экран не следует. https://www.cyberforum.ru/ turbo-pascal/ thread321030.html	Turbo Pascal блок-схема помогите блок-схему составить Program zad4; Function fx(k:integer):Boolean; Var k1:integer; Begin k1:=k; Fx:=false; While k1>0 do If k1 mod 10 = 2 then Begin fx:=true;
Turbo Pascal Массив. В массиве записана информация о стоимости 20 видов товара Определить, сколько видов товара имеют стоимость меньшую, чем средняя стоимость всех товаров. https://www.cyberforum.ru/ turbo-pascal/ thread321014.html	Turbo Pascal Записать в файл g наибольшее значение первых пяти компонент файла f Дан файл f, компоненты которого являються целыми числами. Записать в файл g наибольшее значение первых пяти компонент файла f, затем следующих пяти компонент и т.д. Если в последней группе окажется менее пяти компонент, то последняя компонента файла g должна быть наибольшей из компонент файла f, образующих последнюю (неполную) группу. https://www.cyberforum.ru/ turbo-pascal/ thread321012.html
Дано предложение вывести все буквы "м"и"н" в нем. Turbo Pascal Дано предложение вывести все буквы "м"и"н" в нем.	Turbo Pascal написать одномерный массив Написать процедуру формирования значений элементов одномерного массива в интервале от 30 до 50 с использованием random. Кол-во элементов массива может быть любым, но не превышающим заранее известное значение https://www.cyberforum.ru/ turbo-pascal/ thread321008.html

Stein0

0 / 0 / 0

Регистрация: 05.06.2011

Сообщений: 20

Нужно отредактировать неправильный вывод - Turbo Pascal - Ответ 1766430

16.06.2011, 20:18. Показов 1165. Ответов 5

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Введите три числа с клавиатуры,смените цвет фона экрана и выведите числа в центре экрана их квадраты в порядке убывания---вот задание

Pascal

uses crt;
var a,b,c,d,e,r:integer;
begin
writeln('vvod 3 4isel');
readln(a,b,c);
textbackground(3);
a:=sqr(a);
b:=sqr(b);
c:=sqr(c);
d:=a; e:=b;
if b>d then b:=d;
if c>d then c:=d;
if a<e then a:=e;
if c<e then c:=e;
if(a>e) and(a<d) then r:=a;
if(b>e) and (b<d) then r:=b;
if (c>e) and (c<d) then r:=c;
gotoxy (20,20);
writeln(d);
writeln(r);
writeln(e);
readln;
end.

Вернуться к обсуждению:
Нужно отредактировать неправильный вывод Turbo Pascal

Следующий ответ

Лучшие ответы (1)

Сообщение: #1766549

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

16.06.2011, 20:18

Готовые ответы и решения:

Неправильный вывод второго массива
Добрый день! Подскажите пожалуйста, почему программа выводит во втором массиве одни нули? Спасибо....

Неправильный вывод.
Подскажите пожалуйста почему выводятся одни нули. Заранее благодарю. program core; uses...

Неправильный вывод. (записи)
1) Известны данные о 16 сотрудниках фирмы: фамилия, возраст и отношение к воинской службе...

Неправильный парсинг строки и неправильный её вывод
Добрый день! Столкнулся с непонятным поведением парсера: На вход подается вот такая строка: ...

	16.06.2011, 20:18

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

16.06.2011, 20:18

Помогаю со студенческими работами здесь

Нужно отредактировать Эмблему
Требуется вместо надписи на эмблеме написать "Immortal" без кавычек, таким же шрифтом желательно....

Нужно отредактировать код
Прошу помощи,очень нужно сделать сегодня) Смысл задачи: вычисление выражения в постфиксной форме с...

Нужно отредактировать имеющеюся программу
Условие: Есть n цветов разных видов. Составьте все возможные сочетания букетов из всех этих цветов....

Нужно отредактировать код php
Доброго времени суток! Объясню всё по порядку! Есть форма регистрации найдена в сети! Она уже по...

Наверх