Тема: Свободный практикум

Поменял задачу на более лёгкую с объяснением.

Не я не про это, зря поменял. Я все равно врядли эти задачи решать буду. На "разбор полетов" хотелось бы посмотреть.

О Архитектори... вы уже функции присобачили... Там же всё просто... Ввод - рекурсия - вывод

PHP код:

procedure fake;
var i:integer;
begin
read(i);
if i<>0 then fake;
write(i,'-');
end;
begin
fake;
end. 


Андрей, ты же почти решил её так, только зачем вам функции?
Ладно...
Задание 3 предложил Андрей.

У меня нет готового решения на эту задачу. Так что мы в равных условиях.
Можете позже сами предлагать задачи.

Сообщение от nick84

Не я не про это, зря поменял. Я все равно врядли эти задачи решать буду. На "разбор полетов" хотелось бы посмотреть.

Это свободный практикум. Можешь присоединиться в любой момент, можешь сам задачи предложить.

Кто нибудь, предложите задачу на ргсс.

Твоё задание можно на РГСС сделать. 4 задание я подберу на РГСС специально, будим анимацию делать!

В ргсс нет методов ввода.

Чтение из файла.

PHP код:

data=[]
File.open("code.txt"){|f| data=f.read.split(" ").map{|a| a.to_i}} # если не надо в числа переводить, убираем .map{|a| a.to_i}, если разделитель не пробел, меняем в .split(" ")
p data 


простенькое чтение из файла чисел в массив.

PHP код:

data.each do |a|
 <code># наш код, считай что а - вводим с клавы
end 


Так. Где наша задача на ргсс.

А Задание 3 видимо никто решать ни хочет...
Ладно, сейчас напишу 4 задание. На РГСС, с 3 уровнями сложности.

Спойлер Задание 4:

Анимация по кадрам.
framerate.PNG

Спойлер Теория:

Вывод картинки

PHP код:

$spr=Sprite.new
$spr.bitmap = Bitmap.new (Image_path)
$spr.x,$spr.y = x,y 


Вывод участка картинки

PHP код:

$spr=Sprite.new
$spr.bitmap.blt(x, y + 4, Bitmap.new (Image_path), Rect.new(0, 0, 24, 24)) 


Задача: вывести анимацию на экран.
Болванка сцены будет дана, если необходимо

Спойлер Болванка сцены:

PHP код:

class Scene_Dummy
  def initialize
  end
  def main
    @status_window = Window_Dummy.new
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @status_window.dispose
  end
  #--------------------------------------------------------------------------
  # * Frame Update
  #--------------------------------------------------------------------------
  def update
  end
end


class Window_Dummy < Window_Base
  def initialize(actor)
    super(0, 0, 640, 480)
    self.contents = Bitmap.new(width - 32, height - 32)
    refresh
  end   
  #--------------------------------------------------------------------------
  # * Refresh
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    end
  
end 


Можно вывести анимацию перед отрисовкой титульника, это особой роли не играет.
Уровни сложности:
1 уровень. Самое простое: разрезать на отдельные кадры, подогнать положения, менять кадры-файлы
2 уровень. Посложнее: перекроить, разбить на одинаковые прямоугольники, пенять прямоугольники.
3 уровень. Сложно: Изменять картинку настрого нельзя!
При выполнение 1 и 2 уровня - выкладывать графику необходимо.
Картинка избыточна, на любом уровне можно использовать не все кадры, а только ключевые.

Очень интересная тема, но у меня зачетная неделя, а через чуть больше недели, сессия...

Обязательно прорешаю каждое задание)))
Но лишь в конце месяца...