Ответы на вопрос:
1. примерно вот так почему-то учат писать в program schoolar; var i,j,n: integer; begin write('n = '); readln(n); for i: =1 to n do begin for j: =1 to 50 do if j mod 2 = 0 then write(j,' '); writeln end end. пример n = 3 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 2. примерно вот так рекомендуют делать эту современные концепции // pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! begin loop readinteger('n =') do range(2,50,2).println end. результат n = 3 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50
Популярно: Информатика
-
юля271303.02.2022 12:17
-
Катенька2006130.01.2021 16:13
-
Andrey14BLR05.02.2022 01:00
-
lox5327.05.2022 13:37
-
georggeorg01.02.2023 16:50
-
raufsuleymanov19.04.2023 07:37
-
maarusya08.12.2022 09:46
-
serjo121618.04.2021 15:55
-
Ilyapopovsky1000125.05.2021 05:15
-
MiYaG1123.12.2022 21:40