Задано 3 числа. Вывести на экран: 1) 1 и 2 число, если их сумма равна 25; 2) 2 и 3 число, если их произведение больше 0; 3) 1 и 3 число, если их разность меньше 0.
Помогите пожалуйста с задачей.
Помогите пожалуйста с задачей.
More Questions From This User See All
Answers & Comments
program n_5;
var
a, b, c: integer;
begin
writeln('Введите 3 числа');
readln(a);
readln(b);
readln(c);
if a + b = 25 then
writeln(a, ' ', b);
if b * c > 0 then
writeln(b, ' ', c);
if a - c < 0 then
writeln(a, ' ', c);
end.