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

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

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

Ответы

Ответ дал: ihorsyrota
0
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.

Такую?
Ответ дал: KettyHiv
0
Да! Пасиб)
Ответ дал: ihorsyrota
0
Ок =) Напишите если что надо исправить
Ответ дал: KettyHiv
0
Да не... Вроде всё работает! Спасибо добрый человек)
Похожие вопросы