Напишите , чтобы в pascal abc она работала. перенаправление прочитайте число n из файла input.txt и выведите его в файл output.txt (-32768 < n < 32767)! входные данные: в единственной строке входного файла input.txt записано число от -32767 до 32766! выходные данные: в единственную строку выходного файла output.txt нужно вывести в точности то же число, которое задано во входном файле!

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

younactja228

23.04.2022 16:59

Составить блок схему и программу выводящей на экран дисплея таблицу квадратов чисел, меняющихся в интервале от 1 до 20 с шагом 0,5...

ushelemet

19.05.2021 14:19

Составить программу, которая считывает число. если оно неотрицательное, извлекает из него корень, в противном случает выводит соответсвующее сообщение. паскаль...

mafeei

23.01.2021 11:12

)пользователь вводит пятизначное число необходимо составить обратное число, заменив четные значения разрядов на нечетные и наоборот паскаль...

stasgura

04.08.2022 21:59

1.сколько раз будет выполнен этот цикл? i: =6; while i 5 do begin writeln( ! ); i: =i+1; end; 2.какое число нужно написать вместо многоточия, чтобы цикл выполнился...

Знайка50000000

04.08.2022 21:59

Сколько байт информации содержит сообщение объемом 256 кбит? (ответ – степень 2). с полным решением ))...

Cанек3017

11.10.2020 20:56

Ть зробити інформатику 10 клас 4 завдання!...

Trolololo09

03.03.2021 08:54

Вообще в информатике не розбираюсь...

bar569

03.03.2023 18:38

[/как составить блок-схему к этому формулу] \frac{1}{1 ^{2} } + \frac{1}{2^{2} } ++ \frac{1}{n ^{2} }...

Polino4444444ka

14.01.2022 04:27

Вкаком отношении между собой находятся следующие два понятия - «книга» и «учебник » тождество; пересечение; подчинение; противоположность....

Человекразумный0

06.05.2021 08:41

Расширения .txt, .rtf, .doc имеют: (расширение определяет принадлежность к какому-либо типу файлов и пишется после названия файла) исполняемые файлы; текстовые...

Ответ:

kostas2018

08.10.2020 10:38

Var
t:text;
a:integer;
Begin
assign(t,'input.txt');// файл создать в диске c в папке pabcwork.net (инпут и оутпут)
reset(t);
read(t,a);close(t);assign(t,'output.txt');rewrite(t);
write(t,'Вот число из файла input.txt ', a);close(t);end.

0,0(0 оценок)

Ответ:

NikolaAdamova

08.10.2020 10:38

Var k:longint;f:text; beginassign(f,'C:\q\input.txt');reset(f);read(f,k);close(f);Write(k);assign(f,'C:\q\output.txt'); Rewrite(f); Write(f,k);close(f);end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку