|
задания типа 9 (часть 1)
№№ 2, 18, 21,24,27,28,41,46, 52,53,54,55,56,57,58,59 1.Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования.Алгоритмический язык | Бейсик | Паскаль | алг нач цел 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 | Var s,k: integer; Begin s := 0; for k := 4 to 8 do s := s + 13; writeln(s); End. |
2. Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел 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 | Var s,k: integer; Begin s := 0; for k := 7 to 11 do s := s+11; writeln(s); End. |
3. Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел 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 | Var s,k: integer; Begin s := 0; for k := 12 to 15 do s := s+13; writeln(s); End. |
4. Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел 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 | Var s,k: integer; Begin s := 0; for k := 5 to 9 do s := s+8; writeln(s); End. |
5. Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел 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 | Var s,k: integer; Begin s := 0; for k := 13 to 16 do s := s+14; writeln(s); End. |
6. Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел 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 | Var s,k: integer; Begin s := 0; for k := 8 to 12 do s := s+12; writeln(s); End. |
|
|
|
|