1)Каждые 15 минут вставать из-за компьютера и делать зарядку для глаз (1 минута)
2)Не сутулится, увлекшись работой и позабыв обо всем, близко смотря в экран
3)Находится на безопасном для глаз расстоянии от экрана
Http-протокол (поставь спасибо плиииииииииииииз!(╥_╥)
var i,B,s:integer;
begin
write('Введите число B: ');
readln (B);
for i:=10 downto B do s:=s+i*i;
writeln ('Сумма квадратов всех целых чисел от 10 до ',B,': ',s)
end.