Предмет: Информатика,
автор: POLINA220021
Необходимо составить программу, которая меняет знак у числа. паскаль 7 класс
tolkuevgg:
Если число отрицательное, то программа должна сделать его положительным и наоборот?
да
Ответы
Автор ответа:
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.
Спасибо огромное!
Интересные вопросы
Предмет: Геометрия,
автор: Аноним
Предмет: История,
автор: tatu2222
Предмет: Английский язык,
автор: прмренорапраепорнр
Предмет: Алгебра,
автор: Russian228man
Предмет: Математика,
автор: elizaveta200454