Var I,S: integer;
Begin
S:=0;
for I:=0 to 9 do {цикл, перебираем цифры от 0 до 9 и присваиваем их переменной I }
S:=S+sqr(I); {sqr(I)- квадрат I, Вычисляем квадрат и добавляем его в } общую сумму S}
writeln('сумма квадратов цифр = ',S); {выводим сумму}
<span>end.</span>
500*60*55*1=<span>
1650000байт/1024/1024=</span><span><span>1,573563Мбайт
5916/(34*58)=3 страницы
128*256*4(глубина цвета)=</span></span><span><span>131072 бит/8/1024=16 Кбайт
24*1024*8/(512*128)=3 бита глубина цвета, 2 в степени 3=8 цветов</span></span>
A)кузнец,столяр,швея,шахтёр.b)таксист,слесарь,ткачиха
Направить мышь на нужный текст, нажать правую кнопку мыши,найти СКОПИРОВАТЬ и соответственно нажать на неё. Объект можно вставлять сколько хочешь раз,пока не пройдёт определённое время. Мышь,Клавиши,Экран. Удалить объект можно: если два раза нажать на то,что вставляли,затем нажать на правую кнопку мыши и нажать на кнопку ВЫРЕЗАТЬ.
11.13.15.17.19.21.23.25.27.29.31.33.35.37.39.41....(шаг +2)т.е. число все время увел на 2
22.44.66.88.110.132.154...(шаг +22)т.е. число все время увел на 22
91.81.71.61.51.41.31.21.11.1....(шаг -10)т.е. число все время уменьна 10
_____________________________________
<span>23.53.73.83.(в числе 37 окончание на 7, а во всех остальных окончание 3)
</span>и так далее