Регистрация
233423
08.07.2021 18:02
Информатика
Есть ответ 👍

По паскалю! 21. в компьютер вводятся два числа. если первое больше второго, то вычислить их сумму, иначе - произведение. после этого компьютер должен напечатать текст решена. 22. в компьютер вводятся длины трех отрезков. компьютер должен ответить на вопрос, правда ли, что пер-вый отрезок не слишком длинен, чтобы образовать с другими двумя отрезками треугольник. указание: для этого его длина должна быть меньше суммы длин двух других отрезков. замечание: пока не думайте о том, что слишком длинными могут быть второй или третий отрезки. об этом – из 5.5.

109
297
Посмотреть ответы 3

Ответы на вопрос:

WaySu
WaySu
4,6(3 оценок)

вот более короткое:

var a,b: real;

begin

readln(a,b);

if a> b then writeln(a+b) else writeln(a*b);

writeln(' решена');

end.

 

var a,b,c: integer;

begin

readln(a,b,c);

if a< (b+c) then writeln('не слишком длинный') else writeln('перебор');

end.

вевпончд
вевпончд
4,4(72 оценок)

program pr1; uses crt; var a,b,c: integer; beginwriteln('a,b'); readln(a,b); if a> b then c: =a+belse c: =a*b; writeln(' решена'); end.

2)

program pr1; uses crt; var a,b,c: integer; beginwriteln('a,b,c'); readln(a,b,c); if a< b+c then writeln('не длинный')else writeln('длинный'); end.

Atimofeeva876
Atimofeeva876
4,6(7 оценок)
В1073741824 байта 1024 мегабайта

Популярно: Информатика