Денис
4 год назад
Пожалуйста посчитайте, пожалуйста)Надо написать программу вычисления по информатике (Х^2+1) , если х>0Иначе (Х^2-1)Благодарю
ОТВЕТЫ
Stokes Homer
Oct 24, 2020
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.
386
Смежные вопросы:
