Вопрос по информатике:
Ошибка в pascal (Встречен конец файла, а ожидался оператор)
Помогите, что нужно дописать чтобы ошибка исчезла?
Функция:
function sqrt1 (a, b, c: real): real;
begin
if (2 * a + b - c) < 0 then
writeln (' complex number ') - проверка на комплексные числа
else sqrt1:= sqrt(2 * a + b - c);
end;
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 24.09.2018 16:37
- Информатика
- remove_red_eye 18469
- thumb_up 23
Ответы и объяснения 1
Нужно что-то присвоить функции для случая, когда (2*a+b-c)<0
Например, так:
function sqrt1 (a, b, c: real): real;
begin
if (2 * a + b - c) < 0 then
begin writeln (' complex number '); sqrt1:=-1; end
else sqrt1:= sqrt(2 * a + b - c);
end;
- 25.09.2018 22:03
- thumb_up 32
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.