Помогите надо написать программу в паскале. 1) координаты двух различных полей шахматной доски x1, y1, x2, y2 (целые числа, лежащие в диапазоне 1-8). Проверить истинность высказывания: "Ладья за один ход может перейти с одного поля на другое". 2) Дано трехзначное число. Проверить истинность высказывания: "Все цифры данного числа различны". 3) Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.

Question

Лера

23 февраля, 00:30

+3

Ответы (1)

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

Анда · Answer 1

3. If not (A = B) Then

begin

A = A + B;

B = A + B;

end

else

begin

A = 0;

B = 0;

end;