Программисты помогайте) Написать программу на бейсике, которая по заданным трем числам определяет, является ли сумма каких-либо двух из них положительной

Question

Информатика

Ранка

24 августа, 09:29

Программисты помогайте) Написать программу на бейсике, которая по заданным трем числам определяет, является ли сумма каких-либо двух из них положительной

+5

Ответы (1)

Знаете ответ на вопрос?

Раталя · Answer 1

я программист.

var

a, b, c:integer;

begin

write ('Введите числа A, B, C: ') ;

readln (a, b, c) ;

if (a+b>0) or (b+c>0) or (a+c>0) then

writeln ('Обнаружена положительная сумма!') else

writeln ('Положительной суммы не обнаружено.') ;

readln;

end.