четверг, 19 октября 2017 г.

СР_9класс_информатика

1 Вариант: 1,3,5
2 Вариант: 2,4, 6
1. Задание
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Алгоритмический языкБейсикПаскаль
алг
нач
цел 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
Var s,k: integer;
Begin
s := 8;
for k := 14 to 18 do
s := s+6;
writeln(s);
End.
2. Задание 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Алгоритмический языкБейсикПаскаль
алгнач
цел s, i
s := 3
нц для i от 2 до 5
s := s + 2*i
кц
вывод s
кон
DIM i, s AS INTEGERs = 3
FOR i = 2 TO 5
s = s + 2*i
NEXT i
PRINT s
Var s, i: integer;
Begin
s := 3;
For i := 2 to 5 do
s := s + 2*i;
Writeln(s);
End.
3. Задание 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Алгоритмический языкБейсикПаскаль
алгнач
цел s, k
s := 50
нц для k от 1 до 9
s := s - 3
кц
вывод s
кон
s = 50
FOR к = 1 TO 9
s = s - 3
NEXT k
PRINT s
END
Var s, k: integer;
Begin
s := 50;
for k := 1 to 9 do
s := s - 3;
write (s);
End.
4. Задание 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Алгоритмический языкБейсикПаскаль
алгнач
цел s, k
s := 50
нц для k от 0 до 8
s := s - 4
кц
вывод s
кон
DIM k, s AS INTEGERs = 50
FOR к = 0 TO 8
s = s - 4
NEXT k
PRINT s
END
Var s,k: integer;
Begin
s := 50;
for k := 0 to 8 do
s := s - 4;
writeln(s);
End.
5. Задание 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Алгоритмический языкБейсикПаскаль
алгнач
цел s, k
s := 100
нц для k от 1 до 9
s := s - 5
кц
вывод s
кон
DIM k, s AS INTEGERs = 100
FOR k = 1 TO 9
s = s - 5
NEXT k
PRINT s
END
Var s, k: integer;
Begin
s := 100;
for k := 1 to 9 do
s := s - 5;
write (s);
End.
6. Задание 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Алгоритмический языкБейсикПаскаль
алгнач
цел s, k
s := 8
нц для k от 3 до 8
s := s + 8
кц
вывод s
кон
DIM k, s AS INTEGERs = 8
FOR к = 3 TO 8
s = s + 8
NEXT k
PRINT s
Var s,k: integer;
Begin
s := 8;
for k := 3 to 8 do
s := s + 8;
writeln(s);
End.

Комментариев нет:

Отправить комментарий