Какое число ввел пользователь, если результатом исполнения программы var a: array [1..8] of integer;
i, sum: integer;
begin
Readln(a[1]);
sum := 0;
for i := 2 to 8 do
a[i] := a[i - 1] + 3;
for i := 8 downto 1 do
sum := sum + a[i];
writeln(sum);
end.
является число 100?
i, sum: integer;
begin
Readln(a[1]);
sum := 0;
for i := 2 to 8 do
a[i] := a[i - 1] + 3;
for i := 8 downto 1 do
sum := sum + a[i];
writeln(sum);
end.
является число 100?
More Questions From This User See All