Составьте программу в паскаль, вводящую true, если высказывание является истинным, и false в противном случае. а) треугольник со сторонами a, b, с являются равносторонним. б) целое число n является чётным двузначным числом

265

435

Посмотреть ответы 2

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

полина2133

Информатика

4,5(9 оценок)

Var a,b,c: longint; begin readln(a,b,c); if (a=b) and (b=c) then //если a=b и b=c то writeln('true') else writeln('false'); end. var n: longint; begin readln(n); if (n div 100=0) and (n div 10< > 0) and (n mod 2=0) then //если целая часть от деления на 100 равна 0 //и целая часть от деления на 10 не равна 0 то writeln('true') else writeln('false'); end.