Help!Помогите решить,можно ответ просто,но если не сложно - объясните.
Заранее огромное спасибо!
2 комментария:
Через трассировочную таблицу пойдет?
да
Через трассировочную таблицу пойдет?
да Ответы
Гость ! ForTran 95
program for_help
implicit none
integer :: x, y
read *, x, y
do while(x<16)
if (x>y) then
x = x - 2
y = y + 4
else
x = x + 5
y = y - 3
end if
print *, x, y
end do
end program for_help
x = 3, y = 16
x|y
3 16
8 13
13 10
11 14
-------
16 11
x|y
7 9
12 6
10 10
15 7
13 11
11 15
--------
16 12
Нет комментариев
Список предметов
