263:8=32 остаток (7)
32:8= (0) 4
Но так как ровно делиться ставим 0
И записываем с конца: 407
Ну 50*50=2500Кб,переведи в байты=25000 байт
от 20:00 до 08:30 пройдет 12ч 30 мин
кажд час по минуте
12ч=12минут
08:30-12минут=08:18 над выйти из дома
Var sm, kg:integer;
begin
write('Введите рост (см): ');
readln(sm);
write('Введите вес (кг): ');
readln(kg);
if (sm-100)<kg then
write('Вам нужно похудеть на ',kg-(sm-100),' кг')
else
write('Вам нужно поправиться на ',sm-100-kg,' кг');
end.
1)Находим общий вес текста
51200*10=512000
2)Находим количество символов
512000/16=32000 символов