Var
A:integer;
S:real;
Begin
S:=0;
Write('A = ');ReadLn(A);
While A>0 do
Begin
S:=S+A;
A:=A-1
End;
WriteLn('S = ',S);
End.
Попробуем рассуждать. Дочерей было трое, поскольку по условию "вторая была ...младше старшей и ... старше младшей".
Число три изображается как 10 в троичной системе счисления.
Тогда, в троичной системе старшая дочь на 3 года старше средней, а младшая - на 3 года младше средней. Возраст старшей 1000(3) лет, что равно 27(10). Средней дочери 27-3=24 года, младшей 24-3=21 год.
Ответ: три дочери, 27, 24 и 21 год.
1. Переводим Кбайты в байты
225*1024=230400 байт
2. Переводим байты в биты
230400*8=1843200
3. Находим скорость
1843200/128 = 14400 бит в секунду