Определите, что будет напечатано в результате следующего алгоритма. var k, s: integer;
begin
s:=0;
k:=3;
while s < 66 do begin
k:=k+3;
s:=s+k;
end;
write(k);
end.
265
492
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1363 от 17.12.2016 // внимание! если программа не работает, обновите версию! begin var m: =readinteger('количество строк в матрице: '); var n: =readinteger('количество столбцов в матрице: '); writeln('*** исходная матрица [',m,'x',n,'] ***'); var a: =matrrandom(m,n,-50,50); a.println(4); writeln(4*a.colcount*'-'); var q: =a.cols.select(x-> x.first< x.last).toarray; var k: =q.where(r-> r).count; writeln('*** результирующая матрица [',m,'x',k,'] ***'); var b: =matrfill(m,k,0); var l: =0; for var j: =0 to n-1 do if q[j] then begin for var i: =0 to m-1 do b[i,l]: =a[i,j]; l+=1 end; b.println(4) end. пример количество строк в матрице: 5 количество столбцов в матрице: 8 *** исходная матрица [5x8] *** 15 -35 -11 -18 49 -32 31 -47 -21 -46 7 -48 3 24 -48 5 28 -46 36 -9 17 -32 -44 -10 -16 7 -14 40 13 30 50 -28 -8 35 -49 47 -31 30 18 20 *** результирующая матрица [5x4] *** -35 -18 -32 -47 -46 -48 24 5 -46 -9 -32 -10 7 40 30 -28 35 47 30 20
Популярно: Информатика
-
londonparisch02.05.2021 14:17
-
ghrtoung27.08.2021 12:10
-
lizench30.12.2022 23:30
-
olga1408124.02.2021 08:55
-
NekitGafar10.12.2022 06:53
-
jqoaokwDaniil1108.11.2020 12:00
-
дагмгп27.06.2023 14:17
-
katekurmakaeva04.10.2022 21:45
-
ZefirKa0205.06.2023 19:27
-
magomedalievaa417.08.2022 16:34