Составьте программу которая удваивает число , если оно положительно и делит на 2 , если оно отрицательно.

Язык - pascal

var num: integer;
begin
readln (num);
if(num>0) then
writeln(num * 2)
else
writeln(num / 2)
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.