Ввести 2 числа. если их среднее больше 10, то вывести на экран "ура!"в противном случае ввести на экран"караул!"

Question

Савиниан

1 мая, 01:27

+5

Ответы (1)

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

Агафоклия · Answer 1

Var a, b:real;

begin

write ('введите 2 числа:') ;

read (a, b) ;

if ((a+b) / 2) >10 then

write ('Ура!')

else

write ('Караул!') ;

end.