Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на пяти языках программирования.
| Бейсик | 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; } | |

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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. |

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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. |

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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. |

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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. |

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
| Алгоритмический язык | Бейсик | Паскаль |
| алг нач цел 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.
|


