Объясните , почему паскаль выдает ошибку (Параметр цикла 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.
128
240
Ответы на вопрос:
Популярно: Информатика
-
ylmor228l05.02.2020 03:24
-
elnerfaiq18.05.2023 23:24
-
lady19802631.08.2021 23:47
-
nikbayy21.03.2020 01:48
-
karrtavaya0125.01.2023 09:49
-
жазира2219.10.2022 00:53
-
torivova200418.01.2022 08:13
-
JuMpEr10408.03.2022 11:41
-
KsunyaCernecova07.10.2021 15:06
-
saint692805.03.2020 21:51