Что не так в программе?

var a, b, c:real;

begin;

read (a, b, c) ;

if a>0

then (a>0) and (b>0) and (c>0)

else write ('невозможно')

write (a, b, c) ;

end.

Question

Информатика

Верлена

9 декабря, 07:39

Что не так в программе?

var a, b, c:real;

begin;

read (a, b, c) ;

if a>0

then (a>0) and (b>0) and (c>0)

else write ('невозможно')

write (a, b, c) ;

end.

+3

Ответы (1)

Знаете ответ?

Анатазия · Answer 1

В соответствии с синстаксисом языка Паскаль, после then должен следовать оператор языка. У Вас записано логическое выражение (a>0) and (b>0) and (c>0), которое оператором не является.

Что не так в программе?var a, b, c:real;begin;read (a, b, c) ;if a>0then (a>0) and (b>0) and (c>0)else write ('невозможно')write (a, b, c) ;end.

Что не так в программе?

var a, b, c:real;

begin;

read (a, b, c) ;

if a>0

then (a>0) and (b>0) and (c>0)

else write ('невозможно')

write (a, b, c) ;

end.