#include <iostream>
using namespace std;
int main()
{
int num,temp,k;
temp=0;
k=0;
while (true)
{
cin >> num;
k=k+1;
if (temp == num) { break;}
temp=num;
}
cout<<k<<endl;
}
Из второго бидона отливаем во третий 2 литра
Получаем: 1 бидон - 5 литров, 2 бидон - 1 литр, 3 бидон - 2 литра.
Для краткости буду писать: 5 - 1 - 2 (литров)
Переливаем из второго бидона оставшийся 1 литр в первый бидон
Получаем: 6 - 0 - 2 (литров)
Переливаем из третьего бидона во второй 2 литра
Получаем: 6 - 2 - 0
переливаем из первого бидона в третий 2 литра
Получаем: 4 - 2 - 2
Переливаем из третьего бидона во второй 2 литра
Получаем: 4 - 4 - 0
всё.
Копирование. выделенное слово или текст или часть текста копируется в буфер обмена, и оттуда вставляетя туда, куда нужно
PROGRAM MAIN
INTEGER I,J,K
LOGICAL FLAG
INTEGER A,B
DIMENSION A(5,10)
DIMENSION B(50)
EQUIVALENCE (A,B)
READ *,(B(I),I=1,50)
DO 70 I=1,5
PRINT *,(A(I,J),J=1,10)
70 CONTINUE
DO 100 J=10,1,-1
FLAG=.TRUE.
K=J
DO 200 I=1,5
IF (A(I,J) .LE. 0) THEN
FLAG=.FALSE.
GOTO 100
END IF
200 CONTINUE
IF (FLAG) GOTO 300
100 CONTINUE
300 PRINT *,'k=',K
END PROGRAM MAIN
Var a0, a1, a2, a3, a: longint;
Begin
readln(a3, a2, a1, a0);
a:=a3*1000+a2*100+a1*10+a0;
write(a)
End.
Пример:
1 5 9 8
1598