//Создать консольное приложение program ConsoleProgram; {$APPTYPE CONSOLE} var valueN,sum,i,i2,tmp:longint; begin sum:=0; readln(valueN); for i:=1 to valueN do begin tmp:=1; for i2:=1 to i do tmp:=tmp*i2; sum:=sum+tmp; end; writeln(sum); readln; end.
1.Тождественный – это точно соответствующий кому- или чему-либо, оди-наковый. Если объем одного понятия равен объему другого понятия, то между ними возникает отношение тождества. Первый космонавт –Юрий Гагарин. Столица России-город Москва. 2. Пересечением называют отношение между понятиями, объемы которых совпадают частично, т. е. содержат общие элементы. Электронное письмо –письмо на русском языке. Школьница-спортсменка. 3. Подчинением называют отношение между понятиями, когда объем одного из них полностью входит в объем другого понятия, но не исчерпывает его. Хищник-лев.
1)Растровый графический файл содержит черно-белое изображение (без градаций серого) размером 100 на 100 точек. Какой объем памяти требуется для храненияэто файла? Решение: 100*100=10000 точек 2 градации цвета (черный, белый)=1бит Следовательно: 10000бит 2) Рисунок построен с использованием палитры 256 цветов на экране монитора с графическим разрешением 1024 на 768. Рассчитать объем памяти необходимый для хранения этого рисунка? Решение: 256=2^8 степени 1024*768=786432бит / 8 = 98304 бит = 12288байт = 12Кб
program ConsoleProgram;
{$APPTYPE CONSOLE}
var valueN,sum,i,i2,tmp:longint;
begin
sum:=0;
readln(valueN);
for i:=1 to valueN do
begin
tmp:=1;
for i2:=1 to i do
tmp:=tmp*i2;
sum:=sum+tmp;
end;
writeln(sum);
readln;
end.