Вопрос по информатике:
Даны два числа. Замените меньшее из двух чисел их суммой, а большее произведением этих чисел.
- 04.12.2017 04:00
- Информатика
- remove_red_eye 13439
- thumb_up 34
Ответы и объяснения 1
Простая задача же.
var
c1,c2,b,m:integer;
begin
write('Введите число 1 ');
readln(c1);
write('Введите число 2 ');
readln(c2);
if c1>c2 then begin b:=c1, m:=c2; c2:=m+b; c1:=m*b; end
else
b:=c2, m:=c1; c1:=m+b; c2:=m*b;
end:
write('Первое число=',c1,'Второе число=',c2);
end.
- 05.12.2017 02:31
- thumb_up 9
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.