1. Вычислить 1/2+1/4+1/6+…1/10.
2. Найти произведение чисел от 1 до 10.
3. Подсчитайте количество високосных годов, начиная с 2000 по 2100 г. г., считая 2000 год – високосным.
4. Вывести на экран все числа, кратные 3 и 7 в интервале от 1 до 700.
5. Подсчитайте количество воскресений в 2018 году.
6. Составьте программу вычисления суммы четных и нечетных чисел от 1 до 1000.
7. Составьте программу на языке Паскаль для подсчета количества букв «Р» в тексте

program first;

var z,d,k: integer;

begin

writeln('input z,d,k');

readln(z,d,k);

if (d> =z) then

d: =d-z

k: =k+1

writeln(d,'    ',k);

readln;

end.

64*48*12*8=294,912- обьем в байтах 1 стр

думаю так1) налить в кувшин 3 л, перелить в емкость,где будет 7 л

2) еще раз налить туда 3 л

3) налить 3 л воды налить в кувшин для 8 л, потом еще раз для 8 литров и еще раз(3 раза) на третьем разе останется 1 л,этот л и доливаем в кувшин с 7 л 

ткань, глина, дерево, стекло, бумага, металл, пластмасса, резина, лед, фасфор, газ, вода из всего этого може быть сделана информацтонная модель.