Ввести число вывести "Мяу" если оно отрицательное и вывести "Гав" если оно положительное.

Question

Информатика

Саня

15 февраля, 18:27

Ввести число вывести "Мяу" если оно отрицательное и вывести "Гав" если оно положительное.

+1

Ответы (1)

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

Настуля · Answer 1

Program test;

var

a:integer;

begin

writeln ('Введите число: ') ;

readln (a) ;

if a>0 then

writeln ('Гав ')

else

writeln ('Мяу ') ;

readln;

end.