Предмет: Информатика,
автор: sergeyzinovev58
1. Составить программу вычисления функции:
y={(x^2+1,еслиX>9
2x,еслиX≤9
2. Составить программу вычисления
Нужен код на паскале.
Приложения:
Ответы
Автор ответа:
1
var
x, y: integer;
begin
writeln('Введите значение x: ');
read(x);
if x > 9 then
y := sqr(x) + 1;
if x <= 9 then
y := 2 * x;
writeln('y = ', y);
end.
sergeyzinovev58:
А что по второму заданию?
var
x, y: integer;
begin
writeln('Введите значение x: ');
read(x);
if x < -1 then
y := x;
if (x >= -1) and (x <= 3) then
y := 6 * x;
if x > 3 then
y := 10 * sqr(x);
writeln('y = ', y);
end.
x, y: integer;
begin
writeln('Введите значение x: ');
read(x);
if x < -1 then
y := x;
if (x >= -1) and (x <= 3) then
y := 6 * x;
if x > 3 then
y := 10 * sqr(x);
writeln('y = ', y);
end.
Похожие вопросы
Предмет: Английский язык,
автор: Saptem
Предмет: Химия,
автор: abaynassimov
Предмет: Математика,
автор: igorx2004
Предмет: Математика,
автор: misa0231as0231
Предмет: Литература,
автор: LERATIGR123