дано целое число если оно является положительным то вычесть из него 8. в противном случае прибавить к нему 6.вывести полученное число .
supersuperkirip54irs:
А где программу писать? Могу в Паскале?
Да.
А если число ноль???
Сложно,просто напиши Pascal. Пожалуйста
Ответы
Ответ дал:
7
var a:integer;
begin
read(a);
if a>=0 then
write(a-8) else
write(a+6);
end.
begin
read(a);
if a>=0 then
write(a-8) else
write(a+6);
end.
Это если число больше или равно нолю, то вычитаем 8.
Ответ дал:
6
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
n:= n>0 ? n-8 : n+6;
Writeln('n=',n)
end.
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
n:= n>0 ? n-8 : n+6;
Writeln('n=',n)
end.
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад