Акпаратты олшемм бирликтерин осу ретинде жаз Теробайт килобит мегабит гегабаит килобайт байт бит
297
470
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1383 от 09.02.2017 // внимание! если программа не работает, обновите версию! begin var x: =readreal; var t: =seqgen(30,x,y-> y*x).select(y-> sin((y-> y< 0); writeln(t); end. примеры 0.73 false 1.18 true
Популярно: Информатика
-
Anonim4ka15.08.2022 04:16
-
masha00700911.07.2020 02:33
-
cuwilayab28.02.2022 06:39
-
StasDvorchuk12.04.2023 14:55
-
ulaborodina5703.08.2020 15:22
-
Igorkhvan31.12.2021 08:08
-
monyachina1081p08tm729.05.2020 07:49
-
iMpreSS1ve133702.11.2020 07:19
-
Finneas21.12.2022 11:21
-
lubas14317.06.2021 00:40