• Предмет: Информатика
  • Автор: VadimKanyuk228
  • Вопрос задан 7 лет назад

Есть ошибка как исправить
Програма турбо паскаль

Приложения:

Ответы

Ответ дал: shavrinatv
2

Ответ:

Объяснение:

X:=true - ошибка, т.к. х-real вместо этого x:= y, наверное и перед else

if (x>y) or (x>0) then

begin

end

else

....


Аноним: ну точнее зачем
Аноним: var
x, y:real;
begin
if (x>y) or (x>0) then
begin
y:=x+3;
end
else write ('Помилка');
writeln (y);
end.
Аноним: что примечательно в таком виде она тоже работает
Аноним: и результат её работы в окне вывода тоже - Помилка0
shavrinatv: writeln в блок then begin ...... writeln y; end и вначале можно написать оператор для ввода х и y, или присвоить им значения какие-нибудь
Аноним: в принципе как вариант...
Аноним: и как ни странно тот же вариант в окне вывода что и прошлые вариации этой программы даёт такой же результат вот такая вариация:
Аноним: begin
writeln ('Помилка0');
end.
shavrinatv: В твоих вариантах writeln будет всегда , независимо от if
Аноним: ну это-то понятно если приводить к 1 результату и тому же в окне вывода
Похожие вопросы