Задачи по информатике написать задачу в паскале. Условия такие: "Даны целые

Задачки по информатике написать задачку в паскале. Условия такие: "Даны целые числа х и у. Если хgt;у, то нужно найти творение этих чисел, иначе их приватное". Сумел написать только так, чтоб находилось творенье, а как сделать "По другому" я не понимаю. Вот, поглядите:
Program zadacha;
var x,z,y : integer;
begin
readln (x,y);
If xgt;y then
z:=x*y
writeln(z);
end.

Задать свой вопрос
2 ответа

Program zadacha;

var x,z,y : integer;

begin

readln (x,y);

If xgt;y then

begin

z:=x*y;

writeln(z);

end

else

begin

z:=x/y;

writeln(z);

end;

end.

else - на российском означает по другому . Можно было переводчиком просто воспользоваться.

Леха Бабаич
вы допустили ошибку в ответе.

Program zadacha;

var x,y : integer;

z:real;

begin

readln (x,y);

If xgt;y then

begin

z:=x*y;

writeln('x*y = ',z);

end

else

begin

z:=x/y;

writeln('x/y = ',z);

end;

end.

else - по другому. Перед этим оператором не ставится точка с запятой.

Мария Рихорд
Почему real? Real - это же вещественное число, а необходимо естественное
Олег Скицань
Целое
Никитка Гойликовский
извините, не стал заморачиваться, исправлю. Дело в том что во 2-ой доли у нас идёт разделенье, нужно переменной "z" задать тип real.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт