Даны отрезки A B C D, проверить можно ли из этих отрезков построить равнобедренную...

Question

Даны отрезки A B C D, проверить можно ли из этих отрезков построить
равнобедренную трапецию.

Comments

чёт как то странно , у тебя 118 ответов ,111 из которых по инфе, 209 благодарностей скорее всего тоже по ней а ты просишь помоши с элементарной задачей и даёшь за не 33 бала?

Answer 1

Var a,b,c,d:integer;
beginwriteln('введите длины сторон трапеции');
readln(a,b,c,d);
if (a=0) or (b=0) or (c=0) or (d=0) then writeln ('нельзя')
else if((a=b) or (a=c) or (a=d)) or ((b=c) or (b=d)) or (c=d) then writeln ('можно')
else writeln('нельзя');
end.

Comments

во второй строке между begin и writeln пробел забыл