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

Leprecon1 Leprecon1    3   11.05.2020 18:45    0

Ответы
поолра поолра  14.10.2020 13:35

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика