Предмет: Информатика,
автор: Zebra159
Помогите, пожалуйста)
Надо написать программу вычисления по информатике
(Х^2+1) , если х>0
Иначе (Х^2-1)
Благодарю
Ответы
Автор ответа:
0
program n1;
var
x,S : integer;
begin
writeln('Введите X: ');
readln(x);
if x>0 then
S:=x*x+1
else
S:=x*x-1;
writeln('Ответ равен= ',S);
End.
var
x,S : integer;
begin
writeln('Введите X: ');
readln(x);
if x>0 then
S:=x*x+1
else
S:=x*x-1;
writeln('Ответ равен= ',S);
End.
Автор ответа:
0
Спасибо огромное
Автор ответа:
0
:*
Интересные вопросы
Предмет: Математика,
автор: riginzamalova82
Предмет: Русский язык,
автор: sodkkwa
Предмет: Геометрия,
автор: skorobogatovnestor
Предмет: Математика,
автор: Аноним