Размещено 4 года назад по предмету
Информатика
от softsofi
Объясните пожалуйста, почему паскаль выдает ошибку (Параметр цикла for в PascalABC.NET должен описываться в заголовке цикла)?
var x,a,i,b:integer;
begin for i:= 1 to 10000 do
begin
x:=i;
a:=3*x +23;
b:=3*x -17;
while a <> b do
begin
if a > b then
a:= a - b
else
b:= b - a
end;
end;
if a=20 then
writeln (i);
end.