Информатика. Заданы размерытрех стержней. Определить, можно ли из них построить...

0 голосов
29 просмотров

Информатика. Заданы размерытрех стержней. Определить, можно ли из них построить параллелограмм ( у него стороны попарно равны, однако не забудьте, что размеры стержней вводятся в произвольном порядке) "Кумир"


Информатика (12 баллов) | 29 просмотров
Дан 1 ответ
0 голосов

Var
  a, b, c: integer;

begin
  writeln('Введите размеры стержней: ');
  readln(a);
  readln(b);
  readln(c);
  if (a = b) or (a = c) or (b = c) then
    writeln('Можно')
  else
    writeln('Нельзя');
end.

(6.8k баллов)