Вопрос по информатике:
Как в паскале записать программу , решающее выражение 7х²-2(х-3)/х-3?
Проводится работа с операторами (если, то, иначе) и при написании вылезает ошибка 1001 "переменной не присвоено значение". Что делать, спасите?
- 03.06.2018 23:03
- Информатика
- remove_red_eye 10316
- thumb_up 47
Ответы и объяснения 2
//Мои скромные соображения относительно данной задачи. Если написала не то, не обессудьте.
var x:integer;
y:real;
Begin;
Writeln ('Введите значение х:');
Readln(x);
If x=3 then writeln ('Знаменатель равен 0!')
else
y:=(7*sqr(x)-(x-3)*2)/(x-3);
Writeln('у=',y);
End.
- 04.06.2018 10:42
- thumb_up 33
VAR
x,a,b: Integer;
y: Real;
Begin
WriteLn('Введите x');ReadLn(x);
if x = 3 then begin
WriteLn('Знаменатель равен 0!');
end else begin
a:= x - 3;
b:= 7 * x * x - a * 2;
y:=b / a;
WriteLn(y);
end;
end.
- 05.06.2018 16:41
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.