Ввести число.если оно неотрицательное, вычесть из него 10, в противном случае прибавить к нему 10. составить программу ​

настя7562 настя7562    2   23.04.2019 12:12    1

Ответы
333307 333307  08.06.2020 09:29

program raf105;

var a:integer;

begin

write('Введите число: ');

readln(a);

if a>=0

 then a:= a-10

 else a:= a+10;

writeln('Вывод: ',a);

end.

Язык программирования PascalABC

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