какое число было введено в данной программе, если результатом исполнения является число 100? var a: array [1..8] of integer;
i, sum: integer;
begin
readln (a [1]);
sum :=0;
for i:=1 to 8 do
a [i] := a [i-1] + 3;
for i :=8 downto 1 do
sum:= sum + a [i];
writeln (sum)
end.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.