Var
R1,R2,R3,R:real;
begin
read(R1,R2,R3);
R:=R1*R2/(R1+R2)+R2*R3/(R2+R3);
write(R:2:2);
end.
Двоичная, но получается 51, а не 15. может вы перепутали?
<span>int A = Convert.ToInt32(t1.text); //получаем значение из поля и переводим строку в число
bool f=false; //объявили логическую переменную и дали ей значен false
while (A!=0) //цикл, пока А не будет равно 0 он выполняется
{
if(A%10==5) //условие, проверяет если при делении А на 10 равно 5, то
f=true; //флаг получает true
A/=10; //А делиться на 10 и записывается в А
}
T2.text=f?"da":"net";
// тернарный оператор, если t2.text =f, то будет da, если не равно, то будет net</span>
Возможно западает какая-нибудь клавиша на клавиатуре или мышке (если были механические повреждения или что-нибудь проливали). Либо может кто-то шутить, подключившись через программу удаленного управления, например.
Устройства ввода - клавиатура, dvd, мышь.
Устройства вывода - dvd, принтер, радио.
Обработка - компьютер, телефон.