Предмет: Информатика,
автор: АртёмПогребенко12
В чем ошибка? Пишет:
Встречено 'else', а ожидалось ';'
Что делать ведь перед 'else' нельзя ставить ';'
Program BlockAlgorithm;
var
x,y : integer;
begin
writeln('Start');
writeln('Imput x ');
read(x);
writeln('Imput y ');
read(y);
if x>y then
x := x-y;
y := x+y;
writeln(x, y);
writeln(x)
else
if x
y := y-x
x := y+x
writeln(x, y)
end.
Язык Pascal
P.S я новичек ничерта не понимаю
srzontmp:
А что должна делать программа ? Из Вашего текста получается, если x>y, то x:=x-y; y:=x;, if x y := y-x - а это как понимать?
Ответы
Автор ответа:
0
У тебя сложные if. Включи операции внутри в блоки begin - end
Похожие вопросы
Предмет: Информатика,
автор: ablazovanarie
Предмет: Другие предметы,
автор: anna3140
Предмет: Алгебра,
автор: Аноним
Предмет: Алгебра,
автор: Valerydevil
Предмет: Другие предметы,
автор: Аноним