Регистрация
dan4ik105217
16.03.2021 02:02
Информатика
Есть ответ 👍

Pascalabc.net текстовый файл input.txt содержит натуральные числа. написать программу, которая создает текстовый файл output.txt, содержащий все четные числа файла input.txt в порядке возрастания.

296
421
Посмотреть ответы 2

Ответы на вопрос:

cherry1527
cherry1527
4,5(63 оценок)

попробуй этот код

uses crt;

var f,g: text;

    a,max,min: integer;

begin

assign(f,'c: \in.txt');

assign(g,'c: \out.txt');

reset(f);

rewrite(g);

max: =0;

min: =0;

reset(f);

while not eof(f) do

      begin

      read(f,a);

      if a> max then max: =a;

      if a< min then min: =a;

      end;

writeln(g,'max ',max);

writeln(g,'min ',min);

close(f);

close(g);

end.

mashazygmangovich
mashazygmangovich
4,6(100 оценок)

Что такое кибербуллинг

любые сообщения или публикации в сети с целью запугать или оскорбить(2)

Как следует запоминать пароли

Запоминать

Скрытый файл

Популярно: Информатика