
Захар
5 год назад
1)var s;k: integer;begins:=4;for k:=1 to 3 dos:=s+2*k;write (s);end2)var s;k;I: integer;begins:=3;I:=3*s;for k:=3 to 9 dos:=s+I;write (s);end
ОТВЕТЫ

Dmitrij
Oct 24, 2020
//1)
var
s, k: integer;
begin
s := 4;
for k := 1 to 3 do
s := s + 2 * k;
write(s);// s = 16
end.
//2
var
s, k, I: integer;
begin
s := 3;
I := 3 * s;
for k := 3 to 9 do
s := s + I;
write(s);// s = 66
end.
var
s, k: integer;
begin
s := 4;
for k := 1 to 3 do
s := s + 2 * k;
write(s);// s = 16
end.
//2
var
s, k, I: integer;
begin
s := 3;
I := 3 * s;
for k := 3 to 9 do
s := s + I;
write(s);// s = 66
end.
349
Смежные вопросы: