Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
1 / 1 / 0
Регистрация: 03.10.2013
Сообщений: 34
1

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

06.10.2013, 18:15. Просмотров 1396. Ответов 1
Метки нет (Все метки)

Даны целые числа ш,и: Если числа не равны,то заменив каждое из них одним и тем же числом, равным большему из исходны,а если равны то заменив числа нулями.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.10.2013, 18:15
Ответы с готовыми решениями:

Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных
даны 2 числа. если числа не равны, то заменить каждое из них одним и тем же числом, равным большему...

Если числа не равны, то заменить каждое одним числом, равным большему из исходных
Помогите решить! Если числа не равны то заменить каждое из них одним и тем же числом, равным...

Если числа не равны, то заменить меньшее из них большим, а если равны — заменить нулями
Даны целые числа m и n. Если числа не равны, то заменить меньшее из них большим, а если равны -...

Если числа отрицательны и не равны между собой, то каждое число замените наибольшим из них
Введите с клавиатуры три числа:A,B,C. ЕслиA>B>C>0,то замените все числа их квадратами и выведите...

1
79 / 79 / 84
Регистрация: 26.09.2012
Сообщений: 341
07.10.2013, 17:40 2
Лучший ответ Сообщение было отмечено Vadim050596 как решение

Решение

Vadim050596,

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
   a,b: real;
begin
     Write('a:'); Readln(a);
     Write('b:'); Readln(b);
     if a>b then b:=a
            else
     if b>a then a:=b
            else
     if a=b then begin
            a:=0;
            b:=0;
            end;
     Writeln('a=',a:10:2,' ','b=',b:10:2);
     Readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.10.2013, 17:40

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

Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями
2)Даны целые числа m, n. Если числа не равны, то заменить каждое из них одним и тем же числом,...

Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями.
РЕШИТЕ пожалуйста 1) Даны целые числа m,n. Если числа не равны, то заменить каждое из них одним...

Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных...
Даны целые числа A, B. Если числа не равны, то заменить каждое из них одним и тем же числом, равным...

Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных
1. Даны целые числа X и Y. Если числа не равны, то заменить каждое из них одним и тем же числом,...


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

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

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