Фортунат
4 год назад
информатика. Заданы размерытрех стержней. Определить, можно ли из них построить параллелограмм ( у него стороны попарно равны, однако не забудьте, что размеры стержней вводятся в произвольном порядке) "Кумир"
ОТВЕТЫ
Simon Barrie
Oct 24, 2020
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.
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.
970
Смежные вопросы:
