Ruby/Mažiausio skaičiaus radimas: Skirtumas tarp puslapio versijų

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

00:16, 10 gruodžio 2005 versija

Mažiausias skaičius iš trijų

Paskalio variantas

program minimumas;
  var a, b, c, min: integer;
begin
  readln(a, b, c);
  if a < b then if a < c then min := a
                         else min := c
           else if b < c then min := b
                         else min := c;
  writeln(min)
end.

Ruby variantas

a, b, c = gets.split(" ")        # elementai atskirti tarpais
a, b, c = a.to_i, b.to_i, c.to_i # paverčiame į sveikuosius skaičius
min = [a, b, c].min              # mažiausias elementas sąraše
puts min

Mažiausias skaičius eilutėje

Naudotojas įveda daug skaičių atskirtų tarpais ir paspaudžia enter klavišą. Programa turi parodyti mažiausią skaičių.

Paskalio variantas

program minimumas;
  var skaicius, min: integer;
begin
  read(skaicius);
  min := skaicius;
  
  while not eoln do begin { kol ne eilutės pabaiga }
    read(skaicius);
    if skaicius < min then min := skaicius;
  end;
    
  writeln(min);
end.


Ruby variantas

skaiciai = gets.split(" ").collect { |skaicius| skaicius.to_i }
puts skaiciai.min