Типизированные файлы, pascal 1.ввести с клавиатуры целое число n (> 1). создать файл целых чисел и записать в него n первых положительных четных чисел (2, 4, …). 2.вывести содержимое файла на экран.
110
206
Ответы на вопрос:
Program n1; var n,i: longint; t: text; s: string; begin readln(n); assign (t,'file.txt'); rewrite(t); for i: =2 to n do if i mod 2=0 then write(t,i,' '); close(t); assign(t,'file.txt'); reset(t); read(t,s); write(s); close(t); end.
1. 80*192=15360 точек всего. 256 цветов = 8 бит на точку (1 байт) 15360*1=15360 байт, или 15.36 кбайт.
Популярно: Информатика
-
ZABENOK12303.03.2023 08:02
-
rodinaolga05.06.2023 20:37
-
Андрюша178904.07.2021 05:14
-
kek12312105.06.2020 02:42
-
nyushanyusha20owzt3627.11.2020 02:46
-
carrot425.04.2020 09:29
-
nastich119.08.2020 20:56
-
Sokolova232726.10.2021 19:43
-
Dorefi18.09.2022 23:35
-
SuperSanii24.03.2020 04:03