• Предмет: Информатика
  • Автор: nikitaNellik
  • Вопрос задан 2 года назад

Напишите программу паскаль если x>10 или x<-10 то y=x+5


liaogorodnikova: есть какие-нибудь ещё условия?
alexander21020599: Могу на Питоне
alexander21020599: Займет минуту, может 2-3
alexander21020599: Паскаль - не очень
liaogorodnikova: давай,а я попробую на паскаль перевести
alexander21020599: Погнали, чел
alexander21020599: Хаахэпэпэа, придется самому придумать условия для задачи))))
alexander21020599: x = int(input())
y = 0
if x > 10 or x < -10:
y = x + 5
print(y)
alexander21020599: Только отступы расставить и всё)
liaogorodnikova: var x,y:integer;
begin
read(x);
y:=0;
if (x>10) or (x<-10) then
y:=x+5;
print(y);
end.

Ответы

Ответ дал: daraprelj
0

var x,y:real;

begin

readln(x);

if (abs(x))>10 then

y:=x+5;

writeln(y);

end.

Вас заинтересует