Ruby/Iš duomenų failo nuskaityti du skaičius ir sukeistus vietomis įrašyti į rezultatų failą: Skirtumas tarp puslapio versijų

Iš Wikibooks.
Ištrintas turinys Pridėtas turinys
Expert (aptarimas | indėlis)
Nėra keitimo santraukos
(Jokio skirtumo)

23:46, 9 gruodžio 2005 versija

Paskalio variantas

program SukeistiSkaicius;
  var duomenys, rezultatai: text;
      x, y: integer;
begin
  assign(duomenys, 'duomenys.txt');     reset(duomenys);
  assign(rezultatai, 'rezultatai.txt'); rewrite(rezultatai);
  read(duomenys, x, y);
  write(rezultatai, y, ' ', x);
  close(duomenys);
  close(rezultatai);
end.

Ruby variantas

File.open('duomenys.txt', 'r') do |duomenys| # failas atidaromas skaitymui (Read)
  File.open('rezultatai.txt', 'w') do |rezultatai| # failas atidaromas rašymui (Write)
      a, b = duomenys.readline.split(" ") # nuskaito eilutę, kai skirtukas tarpas
      rezultatai.write("#{b} #{a}")
  end # rezultatų failas čia bus automatiškai uždaromas
end # duomenų failas čia bus automatiškai uždaromas