Типизированные файлы, Pascal 1.Ввести с клавиатуры целое число N (amp;gt;1). Сделать

Типизированные файлы, Pascal
1.Ввести с клавиатуры целое число N (gt;1). Сделать файл целых чисел и записать в него N первых положительных четных чисел (2, 4, ).
2.Вывести содержимое файла на экран.

Задать свой вопрос
1 ответ
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.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт