Question

Необходимо составить программу, которая меняет знак у числа. паскаль 7 класс​

Answer 1

Program z1;

Var

a:integer;

Begin

Readln(a) ;

Begin

If a<0 then

Write(a*-1) end;

Begin

if a>0 then

write(a*-1) End;

End.

Answer 2

Конечно, вот пример простой программы на языке Pascal, которая меняет знак у введенного числа:

pascalCopy code
program ChangeSign;
var
  number: integer;

begin
  writeln('Введите число:');
  readln(number);

  number := -number;

  writeln('Число с измененным знаком:', number);
end.

Просто вставьте этот код в вашу среду разработки Pascal и выполните его. Программа запросит вас ввести число, а затем выведет его с измененным знаком.