Ввести число вывести "Мяу" если оно отрицательное и вывести "Гав" если оно положительное.
Ввести число вывести "Мяу" если оно отрицательное и вывести "Гав" если оно положительное.
Гость
Ответ(ы) на вопрос:
Гостьprogram test;
var
a:integer;
begin
writeln('Введите число: ');
readln(a);
if a>0 then
writeln('Гав ')
else
writeln('Мяу ');
readln;
end.
Не нашли ответ?
Похожие вопросы