10,11,12,21,22 так как алфавит троичной системы 0,1,2
Program n1;
var a: integer;
begin
readln(a);
case a of
1..89: writeln('Остроугольный');
90: writeln('Прямоугольный');
91..179: writeln('Тупоугольный');
else writeln('некорректный ввод');
end;
end.
Чтение книги, новая информация поступает в мозг
Делать презентацию
Отвечать урок
Function avg( i,j,k,m: float ): float;
begin
result := (i+j+k+m) / 4.0;
end;