Ошибка: Syntax error, ";" expected but "ELSE" found

@Artyom_ · Регистрация: 14.04.2014

Author24 — интернет-сервис помощи студентам

Напишите программу, использующую модифицированный алгоритм Евклида: нужно заменять большее число на остаток от деления большего на меньшее до тех пор, пока этот остаток не станет равен нулю; тогда второе число и есть НОД.

Pascal

program ex1;
var a,b :integer;
begin
writeln('Vvedite а, b');
readln(a,b);
while a<>b do
if a>b then
a:=a mod b
else b:=b mod a;
if a>b then
writeln('NOD= ',b);
[COLOR="Red"]else[/COLOR]
writeln('NOD= ',a);
end.

В компиляторе ошибкой помечает else. В чем ошибка?

@volvo · 07.05.2014, 17:33

Перед else точка с запятой не ставится.

@Artyom_ · 07.05.2014, 17:37 **[ТС]**

Спасибо))

@volvo Супер-модератор 32830 / 21168 / 8147 Регистрация: 22.10.2011 Сообщений: 36,428 Записей в блоге: 8
	07.05.2014, 17:33	2
	Перед else точка с запятой не ставится. 1

@Artyom_ 0 / 0 / 0 Регистрация: 14.04.2014 Сообщений: 13
	07.05.2014, 17:37 [ТС]	3
	Спасибо)) 0

Опции темы