Варианты заданий
Версия для печати и копирования в MS Word
1
Тип Д8 № 4504
i

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

Бей­сикPython

DIM k, s AS INTEGER

s = 0

FOR k = 6 TO 12

    s = s + 5

NEXT k

PRINT s

s = 0

for k in range(6,13):

    s = s + 5

print (s)

Пас­кальАл­го­рит­ми­че­ский язык

var s,k: integer;

begin

    s := 0;

    for k := 6 to 12 do

        s := s + 5;

    writeln(s);

end.

алг

нач

   цел s, k

   s := 0

   нц для k от 6 до 12

      s := s + 5

   кц

   вывод s

кон

С++

#include <iostream>

using namespace std;

int main() {

    int s = 0;

    for (int k = 6; k <= 12; k++)

        s = s + 5;

    cout << s;

    return 0;

}


2
Тип Д8 № 4526
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 7 до 11

  s := s + 11

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 7 TO 11

  s = s + 11

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 7 to 11 do

   s := s + 11;

 writeln(s);

end.

 


 


3
Тип Д8 № 4532
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 15 до 19

   s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 15 TO 19

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 15 to 19 do

   s := s + 8;

 writeln(s);

end.

 


 

 


4
Тип Д8 № 4552
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 10

  s := s + 11

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 10

  s = s + 11

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 10 do

   s := s + 11;

 writeln(s);

end.

 


 


5
Тип Д8 № 4627
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 12 до 15

  s := s + 13

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 12 TO 15

  s = s + 13

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 12 to 15 do

   s := s + 13;

 writeln(s);

end.

 


 


6
Тип Д8 № 4728
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 9

  s := s + 10

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 9

  s = s + 10

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 9 do

   s := s + 10;

 writeln(s);

end.

 


 


7
Тип Д8 № 4735
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 5

 нц для k от 5 до 11

  s := s + 5

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 5

FOR k = 5 TO 11

  s = s + 5

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 5;

 for k := 5 to 11 do

   s := s + 5;

 writeln(s);

end.

 


 


8
Тип Д8 № 4771
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 5 до 9

  s := s + 8

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 5 TO 9

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 5 to 9 do

   s := s + 8;

 writeln(s);

end.

 


 


9
Тип Д8 № 4775
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 2 до 8

  s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 2 TO 8

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 2 to 8 do

   s := s + 8;

 writeln(s);

end.

 


 


10
Тип Д8 № 4780
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 13 до 16

  s := s + 14

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 13 TO 16

  s = s + 14

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 13 to 16 do

   s := s + 14;

 writeln(s);

end.

 


 


11
Тип Д8 № 4887
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 16 до 20

   s := s + 10

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 16 TO 20

  s = s + 10

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 16 to 20 do

   s := s + 10;

 writeln(s);

end.

 


 

 


12
Тип Д8 № 4950
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 8

 нц для k от 3 до 8

  s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 8

FOR k = 3 TO 8

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 8;

 for k := 3 to 8 do

   s := s + 8;

 writeln(s);

end.

 


 


13
Тип Д8 № 4988
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 8 до 12

  s := s + 12

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 8 TO 12

  s = s + 12

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 8 to 12 do

   s := s + 12;

 writeln(s);

end.

 


 


14
Тип Д8 № 5018
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 9

 нц для k от 3 до 7

  s := s + 9

кц

вывод s

кон

DIM k, s AS INTEGER

s = 9

FOR k = 3 TO 7

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 9;

 for k := 3 to 7 do

   s := s + 9;

 writeln(s);

end.

 


 


15
Тип Д8 № 5024
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 3 до 7

  s := s + 6

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 3 TO 7

  s = s + 6

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 3 to 7 do

   s := s + 6;

 writeln(s);

end.

 


 


16
Тип Д8 № 5025
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 14 до 18

   s := s + 7

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 14 TO 18

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 14 to 18 do

   s := s + 7;

 writeln(s);

end.

 


 

 


17
Тип Д8 № 5131
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 3 до 8

  s := s + 9

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 3 TO 8

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 3 to 8 do

   s := s + 9;

 writeln(s);

end.

 


 


18
Тип Д8 № 5187
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 6 до 10

  s := s + 10

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 6 TO 10

  s = s + 10

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 6 to 10 do

   s := s + 10;

 writeln(s);

end.

 


 


19
Тип Д8 № 5209
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 7

 нц для k от 4 до 8

  s := s + 7

кц

вывод s

кон

DIM k, s AS INTEGER

s = 7

FOR k = 4 TO 8

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 7;

 for k := 4 to 8 do

   s := s + 7;

 writeln(s);

end.

 


 


20
Тип Д8 № 5297
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  n, s

s := 0

нц для n от 3 до 7

s := s + 2 * n

кц

вывод s

кон

DIM n, s AS INTEGER

s = 0

FOR n = 3 TO 7

  s = s + 2 * n

NEXT n

PRINT s

END

var n, s: integer;

begin

s := 0;

for n := 3 to 7 do

s := s + 2 * n;

write(s);

end.


 


21
Тип Д8 № 5335
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 6 до 12

  s := s + 10

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 6 TO 12

  s = s + 10

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 6 to 12 do

   s := s + 10;

 writeln(s);

end.

 


 


22
Тип Д8 № 5355
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 9 до 13

  s := s + 9

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 9 TO 13

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 9 to 13 do

   s := s + 9;

 writeln(s);

end.

 


 


23
Тип Д8 № 5380
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 8

  s := s + 6

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 8

  s = s + 6

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 8 do

   s := s + 6;

 writeln(s);

end.

 


 


24
Тип Д8 № 5405
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 18 до 22

   s := s + 12

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 18 TO 22

  s = s + 12

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 18 to 22 do

   s := s + 12;

 writeln(s);

end.

 


 

 


25
Тип Д8 № 5412
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 7

 нц для k от 3 до 9

  s := s + 7

кц

вывод s

кон

DIM k, s AS INTEGER

s = 7

FOR k = 3 TO 9

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 7;

 for k := 3 to 9 do

   s := s + 7;

 writeln(s);

end.

 


 


26
Тип Д8 № 5494
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 9

 нц для k от 2 до 7

  s := s + 9

кц

вывод s

кон

DIM k, s AS INTEGER

s = 9

FOR k = 2 TO 7

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 9;

 for k := 2 to 7 do

   s := s + 9;

 writeln(s);

end.

 


 


27
Тип Д8 № 5530
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 7

 нц для k от 13 до 18

   s := s + 9

кц

вывод s

кон

DIM k, s AS INTEGER

s = 7

FOR k = 13 TO 18

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 7;

 for k := 13 to 18 do

   s := s + 9;

 writeln(s);

end.

 


 

 


28
Тип Д8 № 5599
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 17 до 21

   s := s + 11

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 17 TO 21

  s = s + 11

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 17 to 21 do

   s := s + 11;

 writeln(s);

end.

 


 

 


29
Тип Д8 № 5613
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

  цел s, k

  s := 0

  нц для k от 5 до 12

   s := s + 7

  кц

  вывод s

кон

DIM s,k AS INTEGER

s = 0

FOR k = 5 TO 12

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 5 to 12 do

   s := s + 7;

 write(s);

end.


 


30
Тип Д8 № 5657
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 6 до 9

  s := s + 12

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 6 TO 9

  s = s + 12

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 6 to 9 do

   s := s + 12;

 writeln(s);

end.

 


 


31
Тип Д8 № 5666
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 7 до 12

  s := s + 11

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 7 TO 12

  s = s + 11

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 7 to 12 do

   s := s + 11;

 writeln(s);

end.

 


 


32
Тип Д8 № 5707
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 9

 нц для k от 4 до 7

  s := s + 9

кц

вывод s

кон

DIM k, s AS INTEGER

s = 9

FOR k = 4 TO 7

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 9;

 for k := 4 to 7 do

   s := s + 9;

 writeln(s);

end.

 


 


33
Тип Д8 № 5731
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 3 до 9

  s := s + 9

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 3 TO 9

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 3 to 9 do

   s := s + 9;

 writeln(s);

end.

 


 


34
Тип Д8 № 5752
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 14 до 17

   s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 14 TO 17

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 14 to 17 do

   s := s + 8;

 writeln(s);

end.

 


 

 


35
Тип Д8 № 5761
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 9

  s := s + 12

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 9

  s = s + 12

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 9 do

   s := s + 12;

 writeln(s);

end.

 


 


36
Тип Д8 № 5774
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 8

 нц для k от 4 до 8

  s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 8

FOR k = 4 TO 8

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 8;

 for k := 4 to 8 do

   s := s + 8;

 writeln(s);

end.

 


 


37
Тип Д8 № 5780
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 3 до 7

  s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 3 TO 7

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 3 to 7 do

   s := s + 8;

 writeln(s);

end.

 


 


38
Тип Д8 № 5794
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 3 до 8

  s := s + 11

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 3 TO 8

  s = s + 11

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 3 to 8 do

   s := s + 11;

 writeln(s);

end.

 


 


39
Тип Д8 № 5814
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 5 до 9

  s := s + 9

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 5 TO 9

  s = s + 9

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 5 to 9 do

   s := s + 9;

 writeln(s);

end.

 


 


40
Тип Д8 № 5853
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 13 до 17

   s := s + 6

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 13 TO 17

  s = s + 6

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 13 to 17 do

   s := s + 6;

 writeln(s);

end.

 


 

 


41
Тип Д8 № 5858
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 100

  нц для k от 1 до 10

  s := s + 11

кц

вывод s

кон

DIM k, s AS INTEGER

s = 100

FOR k = 1 TO 10

s = s + 11

NEXT k

PRINT s

END

 

var s,k: integer;

begin

 s := 100;

 for k := 1 to 10 do

  s := s + 11;

 write(s);

end.

 


 


42
Тип Д8 № 5867
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 8

  s := s + 13

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 8

  s = s + 13

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 8 do

   s := s + 13;

 writeln(s);

end.

 


 


43
Тип Д8 № 5882
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 7

  s := s + 8

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 7

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 7 do

   s := s + 8;

 writeln(s);

end.

 


 


44
Тип Д8 № 5901
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 4 до 8

  s := s + 7

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 4 TO 8

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 4 to 8 do

   s := s + 7;

 writeln(s);

end.

 


 


45
Тип Д8 № 5924
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

  нц для k от 1 до 11

  s := s + 12

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 1 TO 11

  s = s + 12

NEXT k

PRINT s

END

 

var s,k: integer;

begin

 s := 0;

 for k := 1 to 11 do

  s := s + 12;

 write(s);

end.

 


 

 


46
Тип Д8 № 5936
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 7

 нц для k от 2 до 8

  s := s + 7

кц

вывод s

кон

DIM k, s AS INTEGER

s = 7

FOR k = 2 TO 8

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 7;

 for k := 2 to 8 do

   s := s + 7;

 writeln(s);

end.

 


 


47
Тип Д8 № 5952
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 8

 нц для k от 14 до 18

   s := s + 6

кц

вывод s

кон

DIM k, s AS INTEGER

s = 8

FOR k = 14 TO 18

  s = s + 6

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 8;

 for k := 14 to 18 do

   s := s + 6;

 writeln(s);

end.

 


 

 


48
Тип Д8 № 6001
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 6

 нц для k от 4 до 10

  s := s + 6

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 6

FOR k = 4 TO 10

  s = s + 6

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 6;

 for k := 4 to 10 do

   s := s + 6;

 writeln(s);

end.

 


 

 


49
Тип Д8 № 6036
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 5 до 11

  s := s + 6

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 5 TO 11

  s = s + 6

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 5 to 11 do

   s := s + 6;

 writeln(s);

end.

 


 


50
Тип Д8 № 6127
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 9

 нц для k от 13 до 17

   s := s + 7

кц

вывод s

кон

DIM k, s AS INTEGER

s = 9

FOR k = 13 TO 17

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 9;

 for k := 13 to 17 do

   s := s + 7;

 writeln(s);

end.

 


 

 


51
Тип Д8 № 6187
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  n, s

s := 1

нц для n от 2 до 5

s := s * 3

кц

вывод s

кон

 

DIM n, s AS INTEGER

s = 1

FOR n = 2 TO 5

  s = s * 3

NEXT n

PRINT s

END

var n, s: integer;

begin

s := 1;

for n := 2 to 5 do

s := s * 3;

write(s);

end.


 


52
Тип Д8 № 6255
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 8

 нц для k от 2 до 8

  s := s + 8

кц

вывод s

кон

DIM k, s AS INTEGER

s = 8

FOR k = 2 TO 8

  s = s + 8

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 8;

 for k := 2 to 8 do

   s := s + 8;

 writeln(s);

end.

 


 


53
Тип Д8 № 6409
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

  цел s, k

  s := 0

  нц для k от 3 до 10

    s := s + 13

  кц

  вывод s

кон

DIM s,k AS INTEGER

s = 0

FOR k = 3 TO 10

  s = s+13

NEXT k

PRINT s

END

var s, k: integer;

begin

 s := 0;

 for k := 3 to 10 do

   s := s + 13;

 write(s);

end.


 

 


54
Тип Д8 № 6473
i

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

 

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

 нц для k от 3 до 8

  s := s + 7

кц

вывод s

кон

 

DIM k, s AS INTEGER

s = 0

FOR k = 3 TO 8

  s = s + 7

NEXT k

PRINT s

END

var s,k: integer;

begin

 s := 0;

 for k := 3 to 8 do

   s := s + 7;

 writeln(s);

end.

 


 

 


55
Тип Д8 № 6488
i

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

Ал­го­рит­ми­че­ский язык

Бей­сик

Пас­каль

алг

нач

цел  s, k

s := 0

  нц для k от 1 до 10

  s := s + 14

кц

вывод s

кон

DIM k, s AS INTEGER

s = 0

FOR k = 1 TO 10

s = s + 14

NEXT k

PRINT s

END

 

var s,k: integer;

begin

 s := 0;

 for k := 1 to 10 do

  s := s + 14;

 write(s);

end.