2. количество информации упорядочите указанные количества информации по возрастанию (1 - самое маленькое, 5 - самое большое). 1 килобайт 1200 байт 7500 килобайт 3 мегабайта 0.001 гигабайт
286
477
Ответы на вопрос:
Program untitled; var t,t2: text; i,a: integer; m: array [1..50] of integer; begin randomize; assign(t,'output.txt'); assign(t2,'output2.txt'); rewrite(t); for i: =1 to 50 do begin m[i]: =random(50); writeln(t,m[i]); end; reset(t); rewrite(t2); for i: =1 to 50 do begin readln(t,a); if a mod 2=0 then writeln(t2,a); end; close(t); close(t2); end.
Популярно: Информатика
-
lfif12345678915.03.2021 13:15
-
zopanegra28.01.2021 13:22
-
ьпдомощопаг11.04.2020 13:06
-
InnaBell2511.04.2020 10:17
-
elen1987123.12.2021 08:44
-
крисс123310.09.2020 17:58
-
Myrzik00718.03.2023 13:56
-
Flowers0904.09.2021 07:42
-
aruzhanormanova01.02.2022 04:22
-
jonni020317.05.2022 15:13