Question

2. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы.
 
var s,k: integer;
begin
    s := 0;
    for k := 6 to 10 do
        s := s + 10;
    writeln(s);
end. 


3. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы.

 var s,k: integer;
begin
    s := 8;
    for k := 3 to 8 do
        s := s + 8;
    writeln(s);
end.
 

4. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы.

 var s,k: integer;
begin
    s := 100;
    for k := 1 to 9 do
        s := s − 5;
    writeln(s);
end.
 

5. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы.

 var s,k: integer;
begin
    s := 1;
    for k := 0 to 4 do
        s := s * 3;
    writeln(s);
end.
 

6. Запишите зна­че­ние пе­ре­мен­ной y, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы.
 
var y, i: integer;
begin
    y := 5;
    for i := 1 to 3 do
        y := y + 5 * i;
    writeln(y);
end. 


7. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы.

Var s, k: integer;
Begin
s := 1;
for k := 3downto 1 do
s := s*4;
write (s);
End.

Answer 1

Вставил прогу в паскаль он сам все считает

2) 50

3) 56

4) 55

5) 243

6) 35

7) 64