Question

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

Используем оператор or:
(a>0)or(b>0)or(c>0)

Помогите составить программу.

Answer 1

program p1;
var a,b,c:integer;
begin
writeln('Введите числа a,b,c');
readln(a,b,c);
if ((a>0) OR (b>0) OR (c>0)) then writeln('Условие выполнено');
end.

Такую?

Answer 2

Да! Пасиб)

Answer 3

Ок =) Напишите если что надо исправить

Answer 4

Да не... Вроде всё работает! Спасибо добрый человек)