Вопрос по информатике:
Стороны одного прямоугольники равны A и B. Стороны другого равны Х и Y. Написать программу проверки прямоугольников на равенство Pascal
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 17.02.2015 20:58
- Информатика
- remove_red_eye 3669
- thumb_up 26
Ответы и объяснения 1
Var
a, b, x, y : Integer;
begin
Write('a: ');
Readln(a);
Write('b: ');
Readln(b);
Writeln;
Write('x: ');
Readln(x);
Write('y: ');
Readln(y);
if (a = x) and (b = y) or (a = y) and (b = x) then
Writeln('Прямоугольники равны.')
else
Writeln('Прямоугольники нк равны.');
Readln;
end.
- 18.02.2015 05:51
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.