Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
xxxZLODEUxxx
0 / 0 / 1
Регистрация: 18.05.2010
Сообщений: 12
1

Если их значения трех переменных упорядочены по возрастанию или убыванию, то удвоить их

18.05.2010, 19:01. Просмотров 787. Ответов 1
Метки нет (Все метки)

4. Даны три переменные вещественного типа: A, B, C. Если их значения упорядочены по возрастанию или убыванию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное. Вывести новые значения переменных A, B, C.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.05.2010, 19:01
Ответы с готовыми решениями:

Если значения переменных упорядочены по возрастанию или убыванию, то удвоить их
Помогите пожалуйста написать прогу. Даны три переменные вещественного типа: А,В,С. Если их...

Даны три переменные: X, Y, Z. Если их значения упорядочены по возрастанию или убыванию, то удвоить их
Даны три переменные: X, Y, Z. Если их значения упорядочены по возрастанию или убыванию, то удвоить...

Если значения переменных упорядочены по возрастанию, то удвоить их
Даны три переменных вещественного типа: A, B, C. Если их значения упорядочены по возрастанию, то...

Если три переменные вещественного типа упорядочены по возрастанию, то удвоить их
Даны три переменные вещественного типа: A, B, C. Если их значения упорядочены по возрастанию, то...

Даны три переменные. Если их значения упорядочены, то удвоить их
Даны три переменные: X, Y, Z. Если их значения упорядочены по убыванию, то удвоить их; в противном...

1
Angel-dm
112 / 109 / 33
Регистрация: 21.12.2009
Сообщений: 321
18.05.2010, 21:31 2
Лучший ответ Сообщение было отмечено xxxZLODEUxxx как решение

Решение

4 задача:[можно как-то и проще))) ]
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Program 123;
uses crt;
var
a,b,c,d,e,p: integer;
Begin
clrscr;
Writeln('Введите  А,Б,С:');
readln (a, b, c);
if (a<b) and (b<c) or (a>b) and (b>c)
then
begin
a:=2*a;  b:=2*b;  c:=2*c;
writeln(a,'  ',b,'  ',c);
end
else
begin
d:=(-1)*a;  e:=(-1)*b;   p:=(-1)*c;
writeln(d,'  ',e,'  ',p);
readln;
end;
End.
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.05.2010, 21:31

Если значения трех переменных упорядочены по возрастанию или убыванию, то удвоить их
доброй ночи, уважаемые программисты, студенты, а также все любители программировать. помогите,...

Если значения переменных упорядочены по возрастанию или убыванию, то удвоить их
Даны три переменные: A,B,С. Если их значения упорядочены по возрастанию или убыванию, то удвоить...

Если значения переменных упорядоченны по возрастанию или убыванию, то удвоить их
Даны 3 переменные вещественного типа :A,B,C. Если их значения упорядоченны по возрастанию или...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.