Ответы
Ответ дал:
1
var a: integer;
begin
readln(a);
if (a < 0) then
a := a * 4;
writeln(a);
end.
Надеюсь, что помог.
valakas1480:
Можешь вместо integer (целое число) написать real (число с плавающей точкой).
Похожие вопросы
1 год назад
2 года назад
8 лет назад
9 лет назад