Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
Алгоритмический язык | Бейсик | Паскаль |
алг нач цел s, k s := 0 нц для k от 6 до 12 s := s + 5 кц вывод s кон | DIM k, s AS INTEGER s = 0 FOR k = 6 TO 12 s = s + 5 NEXT k PRINT s END | var s,k: integer; begin s := 0; for k := 6 to 12 do s := s + 5; writeln(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 := 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 := 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 от 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 := 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 от 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 := 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. |
Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
Алгоритмический язык | Бейсик | Паскаль |
алг нач цел 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 := 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 от 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 := 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 := 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 от 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 от 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 от 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 от 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 от 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 от 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 := 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 от 3 до 8 s кц вывод 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 := 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 от 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 := 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 от 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. |
Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
Алгоритмический язык | Бейсик | Паскаль |
алг нач цел 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 от 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 := 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 := 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 до 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 от 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 от 4 до 11 s := s + k кц вывод s кон |
Бейсик | dim s,k As INTEGER s = 0 FOR k = 4 TO 11 s = s + k NEXT k PRINT s END |
Паскаль | var s, k:integer; begin s := 0; for k := 4 to 11 do s := s + k; writeln (s); end. |
Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
Алгоритмический язык | алг нач цел s,k s := 1 нц для k от 1 до 7 s := s + k кц вывод s кон |
Бейсик | DIM s,k AS INTEGER s = 1 FOR k =1 TO 7 s = s + k NEXT k PRINT s END |
Паскаль | var s, k:integer; begin s := 1; for k := 1 to 7 do s := s + k; writeln (s); end. |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел n, s s := 1 нц для n от 5 до 8 s := s * 3 кц вывод s кон | Бейсик | DIM n, s AS INTEGER s = 1 FOR n = 5 TO 8 s = s * 3 NEXT n PRINT s END | Паскаль | var s, n: integer; begin s := 1; for n := 5 to 8 do s := s * 3; write(s); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел n, s s := 1 нц для n от 3 до 8 s := s * 2 кц вывод s кон | Бейсик | DIM n, s AS INTEGER s = 1 FOR n = 3 TO 8 s = s * 2 NEXT n PRINT s END | Паскаль | var s, n: integer; begin s := 1; for n := 3 to 8 do s := s * 2; write(s); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел s, i s := 3 нц для i от 2 до 5 s := s + 2 * i кц вывод s кон | Бейсик | DIM i,s AS INTEGER s = 3 FOR i = 2 TO 5 s = s + 2 * i NEXT i PRINT s END | Паскаль | var s,i:integer; begin s := 3; for i := 2 to 5 do s := s + 2 * i; writeln(s); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел s, n s := 5 нц для n от 2 до 4 s := s + (n - 1) кц вывод s кон | Бейсик | DIM s, n AS INTEGER s = 5 FOR n = 2 TO 4 s = s + (n - 1) NEXT n PRINT s END | Паскаль | var s,n: integer; begin s := 5; for n := 2 to 4 do s := s + (n - 1); writeln(s); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел n, s s := 2 нц для n от 2 до 5 s := s + n * 2 кц вывод s кон | Бейсик | DIM n, s AS INTEGER s = 2 FOR n = 2 TO 5 s = s + n * 2 NEXT n PRINT s END | Паскаль | var s, n: integer; begin s := 2; for n := 2 to 5 do s := s + n * 2; write(s); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел n, s s := 2 нц для n от 2 до 5 s := n + s * 2 кц вывод s кон | Бейсик | DIM n, s AS INTEGER s = 2 FOR n = 2 TO 5 s = n + s * 2 NEXT n PRINT s END | Паскаль | var s, n: integer; begin s := 2; for n := 2 to 5 do s := n + s * 2; write(s); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел k,i k := 4 нц для i от 1 до 3 k := 2 * k + i кц вывод k кон | Бейсик | DIM i,k AS INTEGER k = 4 FOR i = 1 TO 3 k = 2 * k + i NEXT i PRINT k END | Паскаль | var k,i: integer; begin k := 4; For i := 1 to 3 do k := 2 * k + i; Writeln(k); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел y,i y := 0 нц для i от 1 до 3 y := y + 4 * i кц вывод y кон | Бейсик | DIM i,y AS INTEGER y = 0 FOR i = 1 TO 3 y = y + 4 * i NEXT i PRINT y END | Паскаль | var y,i: integer; begin y := 0; for i := 1 to 3 do y := y + 4 * i; writeln(y); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел y,i y := 5 нц для i от 1 до 3 y := y + 5 * i кц вывод y кон | Бейсик | DIM i,y AS INTEGER y = 5 FOR i = 1 TO 3 y = y + 5 * i NEXT i PRINT y END | Паскаль | var y,i: integer; begin y := 5; for i := 1 to 3 do y := y + 5 * i; writeln(y); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел d,n d := 6 d := d - 2 нц для n от 1 до 4 d := d + n кц вывод d кон | Бейсик | DIM n,d AS INTEGER d = 6 d = d - 2 FOR n = 1 TO 4 d = d + n NEXT n PRINT d END | Паскаль | var d,n: integer; begin d := 6; d := d - 2; for n := 1 to 4 do d := d + n; writeln(d); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел d,n d := 5 d := d - 3 нц для n от 1 до 4 d := d + n кц вывод d кон | Бейсик | DIM n,d AS INTEGER d = 5 d = d - 3 FOR n = 1 TO 4 d = d + n NEXT n PRINT d END | Паскаль | var d,n: integer; begin d := 5; d := d - 3; for n := 1 to 4 do d := d + n; writeln(d); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | алг нач цел k,i k := 2 нц для i от 0 до 2 k := 3 * k + i кц вывод k кон | Бейсик | DIM i,k AS INTEGER k = 2 FOR i = 0 TO 2 k = 3 * k + i NEXT i PRINT k END | Паскаль | var k,i: integer; begin k := 2; for i := 0 to 2 do k := 3 * k + i; writeln(k); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел d,n,i n := 4 d := n * 2 нц для i от 1 до 3 d := d + 2 * i кц вывод d кон | DIM d,n,i AS INTEGER n = 4 d = n * 2 FOR i = 1 TO 3 d = d + 2 * i NEXT i PRINT d END | var d,n,i:integer; begin n := 4; d := n * 2; for i := 1 to 3 do d := d + 2 * i; writeln(d); end. | | Конец формы | |
Начало формы Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования. Алгоритмический язык | Бейсик | Паскаль | алг нач цел d,n,i n := 3 d := n * 3 нц для i от 1 до 3 d := d + i кц вывод d кон | DIM d,n,i AS INTEGER n = 3 d = n * 3 FOR i = 1 TO 3 d = d + i NEXT i PRINT d END | var d,n,i: integer; begin n := 3; d := n * 3; for i := 1 to 3 do d := d + i; writeln(d); 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. | | Конец формы | |
Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.
Алгоритмический язык | Бейсик | Паскаль |
алг нач цел 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 от 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 := 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 от 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 := 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 от 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 := 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. | | Конец формы | |