Даны числа: x, y. Вычислите: z=x+y, если [tex]x leq y[/tex], и z=x-y

Даны числа: x, y. Вычислите: z=x+y, если x \leq y, и z=x-y в неприятном случае.

Написать программку в паскале.

Задать свой вопрос
Кирилл Буйников
какое у меня нарушение
Anastasija Soneva
блин удалилась половина
Дашенька Рыпаченко
сори
1 ответ
Program zananija_com;
var x, y, z : integer;
begin
writeln('Введите х');
readln(x);
writeln('Введите y');
readln(y);
if (x lt;= y) then z := x + y
  else z := x - y;
writeln('z = ', z);
readln();
end.

Дашка Камитаева
Оу.. Ваш ответ более полон. Спасибо огромное. :-) Только у меня вопрос: пробелы неотклонимы?
Vjacheslav Kuzemchuk
где пробелы?
Юрик
меж знаками, знаками
Алиса Елибулатова
z := x + y, например
Тулутупов Колек
нет не обязательно просто читабельность превосходнее
Стефания Сенофонтова
Спасибо, вы мне очень помогли :-)
Демченская Дарина
не за что ) обращайся
Софья Куличенкова
Хорошо :)
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт