Есть ответ 👍

решить. Информатика 8 класс​

253
478
Посмотреть ответы 1

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

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.

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