?>
Дано целое число. Если оно является положительным, то прибавить к нему 8; в противном случае не изменять его. Вывести полученное число. a. rogram cislo; var a: integer; begin writeln('Введи число a'); readln(a); if a > 0 then a:=a+8; writeln(a); readln; end. b. program cislo; var a: integer; begin writeln('Введи число a'); readln(a); if a > 0 then a:=a; writeln(a); readln; end. c. program cislo; var a: integer; begin writeln('Введи число a'); readln(a); if a < 0 then a:=a+8; writeln(a); readln; end.
Ответы
лклашпоаьлкклкткртеоелко