Опубликовано 03.01.2018 по предмету Информатика от Гость




Заполнить файл f целыми числами,
полученными с помощью генератора случайных чисел. Из файла f получить файл g, исключив повторные вхождения чисел.
Порядок следования чисел сохранить.
Решение на паскале, написать программу

Ответ оставил Гость

Uses
  System.Collections.Generic;

var
  a: array of string;
  b: List := new List();
  f, g: string;

begin
  readln(f, g);
  System.IO.File.WriteAllText(f, );
  System.IO.File.WriteAllText(g, );
  for k: byte := 1 to 10 do
    System.IO.File.AppendAllText(f, IntToStr(Random(25)) + System.Environment.NewLine);
  a := System.IO.File.ReadAllLines(f);
  foreach k: string in a do
    b.Add(StrToInt(k));
  var i: integer;
  while (i < b.Count - 1) do
  begin
    while (b.IndexOf(b[i]) <> b.LastIndexOf(b[i])) do
      b.RemoveAt(b.LastIndexOf(b[i]));
    inc(i);
  end;
  foreach k: integer in b do
    System.IO.File.AppendAllText(g, IntToStr(k) + System.Environment.NewLine);
end.

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы
Самые новые вопросы