Question

Нужна помощь в информатике(паскаль) var a,b,c:integer; begin a:=−36; b:=abs(a); writeln('abs(−36)=',b); c:=sqr(b); writeln('sqr(b)=',c); c:=sqr(b+b); writeln('sqr(b+b)=',c); end.

Answer 1

Ответ:

- нужно убрать, тогда все работает!

Answer 2

Конечно, я готов помочь! Ваш код на Паскале выглядит практически правильно, но есть одна ошибка и небольшие недоразумения. Вот исправленный код:

pascalCopy code
var
  a, b, c: integer;

begin
  a := -36;
  b := abs(a);
  writeln('abs(-36) = ', b);
  c := sqr(b);
  writeln('sqr(b) = ', c);
  c := sqr(b + b);
  writeln('sqr(b + b) = ', c);
end.

Внесенные изменения:

1. В строке a := −36; был исправлен знак минус. Вам нужно использовать обычный минус (-), а не символ "EN DASH" (−).

2. Вместо writeln('abs(−36)=', b); я исправил на writeln('abs(-36) = ', b);, чтобы пробелы были правильно выровнены в выводе.

Теперь код должен работать корректно и выводить ожидаемые результаты.